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Preface 



i This publication contains descriptions of 

I aajor data areas and control blocks used by 

I the three major conponents of VM/370. The 

I three coaponents are: 

I • The Control Prograa (CP) 

I • The Conversational Monitor System (CHS) 

I • The Remote Spooling Communications 
I Subsystem (RSCS) 



There are three sections 
appendixes, as follows: 



and 



five 



"Section 1. CP Data Areas and Control 
Blocks" contains information about CP 
data areas and control blocks. 

"Section 2. CMS Data Areas and Control 
BlocKs" contains information on CMS data 
areas and control blocks. 

"Section 3. RSCS Data Areas and Control 
Blocks" contains information on RSCS 
data areas and control blocks. 



"Appendix A. CP and RSCS Equate Symbols" 
contains assembler language equate 
symbols used b"^ CP and RSCS to reference 
data. 

"Appendix B. RSCS Control Areas" 

contains RSCS control areas that define 

constants and variables used during 
execution. 

"Appendix C. RSCS Request Elements" 
contains RSCS request elements that are 
the tables used by RSCS for task-to-task 
communication. 



M ac hine Fa cility /370 : Service Routines 
Program Logic, Order No. SY20-0882. 



RELATED POBLICATIONS 



This publication 
conjunction with: 



should be used 



m 



lEn Virtual Machine FacilitY/ 37G : 

System Logic and Problgm Determination 
Guide, 

Yplume J[ Co n trol Program (CP) , Order 
Ho. SY20-0886 

Yplume 2 Conversation al Monitor System 
(CMS) , Order Ko. Sy20-0887 

Volume 3 Remote Spooling C o nimunication 
Sybsystem (RSCS) , Order Ho. SY20-0888 

System P£29£55pe£_|_s Guide, Order No. 
GC20-i807 

Gl os sa ry a nd Master Index, Order Ho. 
GC20-1813. 

For information on how to use the fourth 
component — interactive problem control 
system — and its facilities, the hardware 
and software support personnel or the 
installation system programmer should use: 

IJH Virtual Machine FacilitY/370; 
Interactive Problem Con trol System (IPCS) 
Oser's Guide, Order Ho- GC20-1823.. 



"Appendix D. CMS Equate 
contains CMS equate symbols. 



Symbols" HOH TO USE THI S PDBLICATICH 



"Appendix E. Data Areas and Control 
Block References" contains information 
on the modules that reference data areas 
and control blocks. 



OTHER VM/370 DATA AREAS AHD CONTROL BLOCKS 



Some data areas and control blocks that 
affect VM/370 service and support programs 
are not included in this publication. 
Information on these data areas and control 
blocks can be found in the IBM Virtual 



This publication addresses and describes 
the major control blocks associated with 
CP, CMS, and RSCS. Generally, data areas, 
or scratch areas that are created and exist 
only during the execution of a particular 
module are not described in this 
publication. In this publication, the data 
areas and control blocks are arranged in 
alphabetical order by DSECT name. 

The CBS and RSCS components operate 
under control of CP. Each component 
creates, updates, and erases its own 
control blocks and data areas. 
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Control blocks and data areas are blocks 
of related infornation applicable to one or 
■ore systen functions. They are usually 
defined by the DSECT instruction. The 
blocks can reflect current status, history 
information, or coabinations of both, 
applicable to YM/370 functions. Control 
blocks and data areas provide the linkage 
and information for the user, the hardware, 
and the programs to work as one entity for 
the successful execution of a job, task, or 
process. 



For every data area or control block, a 
statement is given that defines the use of 
the data area or control block. This 
statement is followed by a formatted block 
showing the fields defined in the data area 
or control block and the displacement into 
the DSECT of that field. 

The formatted blocks for CP and CMS 
control areas are 8 bytes wide, showing two 
fullwords per line. RSCS control blocks 
are 4 bytes wide. 

Note: One exception to this width rule is 
the formatting for PSA, where the control 
areas are given in 16-byte width- 



The following terms in this publication, 
refer to the indicated support devices: 



When the na 
fit into the 
the definition 
of the name 
usually takes 
there is a pa 
that uses more 
the formatted 
the block to s 
this field is 
the block. 



me of a field is too large to 
format ted line , a pointer to 

of the field is used instead 
of the field. This pointer 
the form A*1, A*2, etc. When 
rticularly large field (one 

than three or four lines of 
block) , ellipses are used in 
how that the displacement of 

larger than can be shown in 



The use of slashes in a field indicates 
that the field is reserved for IBM's use. 

The formatted block is followed by 
listing-related information such as the 
hexadecimal displacement of the field into 
the DSECT, the name of the field and its 
definition in the listing, and a brief 
description of the contents and meaning of 
the field,. 



"2305" refers to IBB 2305 Fixed 
Storage, Models 1 and 2. 



Head 



"270x" refers to IBB 2701, 2702, and 
2703 Transmission Control Onits or the 
Integrated Communications Adapter (ICA) 
on the System/370 Model 135. 

"2741" refers to the IBM 2741 and the 
3767, unless otherwise specified. 

"3270" refers to a series of display 
devices, namely, the IBM 3275, 3276, 
3277, and 3278 Display Stations. A 
specific device type is used only when a 
distinction is required between device 
types. 

Information about display terminal usage 
also applies to the IBM 3138, 3148, and 
3158 Display Consoles when used in 
display mode, unless otherwise noted. 

Any information pertaining to the IBM 
3284 or 3286 Printer also pertains to 
the IBM 3287, 3288, and 3289 printers, 
unless otherwise noted. 

"3330" refers to the IBM 3330 Disk 
Storage, Bodels 1 , 2, or 11 ; the IBM 
3333 Disk Storage and Control, Models 1 
or 11; and the 3350 Direct Access 
Storage operating in 3330/3333 Model 1 
or 3330/3333 Model 11 compatibility 
■ode. 

"3340" refers to the IBM 3340 Disk 
Storage, Models A2, B1, and B2, and the 
3344 Direct Access Storage Model B2. 

"3350" refers to the IBM 3350 Direct 
Access Storage Models A2 and E2 in 
native mode. 



"370x" refers to IBM 3704 
Communications Controllers. 



and 3705 



The term "3705" refers to the 3705 I and 
the 3705 II unless otherwise noted. 



iv IBM VM/370 Data Areas and Control Blocks Logic 



Contents 



SDSHAHI OF AHESBHEHTS .ix 

SECTION 1. CP DATA AREAS and CONTROL 
BLOCKS . . .1 

ACCTELOK: Oser Accounting Block. . ... .2 

AClPrBLOK: Accounting Card Buffer Block . .2 
ALOCBLOK: DASD Cylinder Allocation Block .4 
ESCBLOK: Binary Synchronous Comiunication 

Control Block .......6 

BUFFER .8 

CCHREC: Channel Check Handler Record . . .9 
CCPARM: Communications Controller 

Parameter List .H 

CHXBLOK and CEYBLOK: Virtual 

Channel-to-Channel Adapter Control 

Blocks. , 12 

CKPBLOK: Telecommunications Checkpoint 

Block 14 

CONTASK: Console I/O Package 15 

COETABLE: Storage Allocation Table ... 17 
CPEXBLOK: CP Execute Block ... ... . 18 

DEEREC: Reconfiguration Macro. ..... 19 

EKPINREC: Dump File Information Record . 20 
DHPKYREC: Dump File Key Storage Record . 21 
DBPTEREC: Dump File Symbol Table Record. 21 
ECBLOK: Extension to YMBLOK for Virtual 

Uachine with Relocate ...22 

EBRBLOK: Error Block Used to Build 

OBR/HDR , 24 

ICBLOK: I/O Task Control Block ..... 25 
lOERBLQK: I/O Error Information Block. . 27 
IBHBLOK: Intensive Error Recording Mode 

Block 31 

I JPSCBLOK: Journaling and Password 

Suppression Control Block . . . . ... 32 

LOCKBLOK: Oser id Lock Control Block. . . 33 
HCHABEA: Machine Check Save Area . ... 34 

HCRECORD: Machine Check Handler Record . 37 
MDRREC: Miscellaneous Data Recording 

Record- .38 

MICBLOK: Virtual Machine Pointer List 

for VM/370 Hardware Assist. . . . . . « 39 

MIHREC: Missing Interrrupt Handler Error 

Record 40 

MHHDR: VM/370 Monitor Record Header. . . 41 
MNOOO: VM/370 Monitor Perform Class 

Record 42 

MN001: VM/370 Monitor Perform Class 

Record. 45 

I MN097: VM/37G Monitor Header Records . . 46 
MN098: VM/370 Monitor Trailer Record ... 46 
MH099: VM/370 Monitor Suspension Record. 47 
MNIOX: VM/370 Monitor Response Class 

Records -, .47 

MH20X: VM/370 Monitor Schedule Class 

Records ......48 

MN400: VM/370 Monitor Oser Class Record. 49 
MN500: VM/370 Monitor Instruction 

Simulation Class Record .50 

I MN600: VM/370 Monitor DASTAP I/O Count 

Records 51 



I HB602: VM/370 Monitor DASTAP Utilization 

Record 52 

MN700: VH/370 Monitor Seeks Class Record 53 
I MH802: VM/370 Monitor System Profile 

Class 54 

I HNDEVLST: VM/370 Monitor Class 6 

(DASTAP) Device List 55 

MCBCOM: VM/370 Monitor Communications 

Area. ..56 

I MSSCOM: MSB Communications Control Block 59 

NCPTBL: Named 37 OX Control Program Table 60 

NICBLOK: Network Interface Control Block 61 

I HPBTBL: Named 3600 Image Library Table . 63 

OBEBECN: Onit Check Error Record (long 

Outboard Record) .... 64 

OBEREC: Onit Check Error Record (Short 

Outboard Record) 66 

OWNDLIST: CP-Owned Volumes List 67 

PAGTABLE: Translation Page Table .... 67 

PGBLOK: Pseudo Page Fault Stack Block. . 68 
PSA: Prefix Storage Area (Low Storage 

Locations) 69 

I PWDIBLOK: Password Invalid Block .... 78 

REAL I/O CONTROL BLOCKS 79 

Seal Channel Control Blocks 79 

Seal Control Onit Blocks 79 

Eeal Device Control Blocks 79 

Input/Output Blocks. ......... 79 

Network Interface Control Block. ... 80 

RCHBLOK: Real Channel Block. ...... 81 

RCOBLOK: Seal Control Onit Block .... 82 

RCiTASK: Translated Virtual I/O CCB. . . 84 
RDEVBLOK: Real Device Block. ...... 85 

RECBLOK: DASD Page (Slot) Allocation 

Block 89 

RECPAG: Error Recording Page Record. . . 90 
RSELCTL: Real Spooling Control Bloclk . . 91 
ESPXELOK: Heal Device Extension EIock. . 91 

SAVEAREA 92 

SAVTABLE: First Page on Saved System 

DASD , 93 

SDBBLOK: Statistical Data Recording 

Block 94 

SEGTABLE: Translation Segment Table. . . 95 

SFBLOK: Spool File Block 96 

SHCBLOK: Spool Hold Queue Block. . . . . 98 
SHBTABLE: Named-Shared Segment Systems 

Table 99 

SPLINK: Spool Page Buffer Linkage Block. ICO 
SWPTABLE: Swap Table for Virtual 

Machine Paging 101 

SYSLOCS: System Low Storage Information 

Block 102 

SYSTBL: Named System Table ...... ,103 

TNSEEC: "T" Type Record Format 

(Environmental Recording) 104 

TBEXT: Virtual Machine Tracing 

Extension to VMBLOK 105 

TBCBLOK: TOD Clock Comparator Request. .107 
ODBFBLCK: Oser Directory Buffer Block. .108 

ODEVBLOK: Oser Device Block 109 

ODIBBLOK: User Directory Block 110 



Contents v 



UMACELOK: User Machine Block Ill 

VIRTUAL I/O CONTROL BLOCKS 113 

Virtual Channel Blocks . . . . - . ..113 
Virtual control Unit Blocks. .... .113 

Virtual Device Blocks. 113 

VCHBLOK: Virtual Channel Block . . . . .114 
VCONCTL: Virtual Console Control Block .115 
VCUBLOK: Virtual Control Unit Block. . .116 
VEEVBLOK: Virtual Device Block . ,. . . .117 
VFCBELOK: Virtual Forms Control Buffer 

Block .120 

I VHABLOK: Shared Systems Control 

Addition to VMBLOK. ......... .120 

VMBLOK: Virtual Machine Control Block. .121 
VMCBLOK: Virtual Machine Communication 

Block - 128 

VMCMHDR: VMCF Message Header ..... .129 

VHCPARM: VMCF Parameter List ..... .130 

VBRBLOK: Virtual Reserve/Release Block .131 
VSPLCTL: Virtual Spooling Control Block. 132 
VSPXELOK: Virtual Spool Extension Block. 133 
XINTELOK: External Interrupt Block . . .134 
XOBR3211: Extended Outboard Recording 

Block - - - .135 

SECTION 2- CMS DATA AREAS AND CONTROL 

BLOCKS. , .137 

AETAB: Abend Termination Option Table. .138 
AEHSECT: Abend Recovery Workspace. . . .139 
AETSECT: Active Disk Table ...... .140 

AFTSECT: Active File Table 143 

AHCHSECT: Anchor Table ...... - . .145 

E ATLSECT : G MS Batch User Job Lijiits. - .146 

EEOX: Boundary Box ..146 

EGCOM: DOS/VS Partition Communication 

Region- . - 147 

CMSTAXE: Terminal Attention Exit 

Element .149 

CVTSECT: Communication Vector Table as 

supported by CMS .150 

DEGSECT: Debug Work Area . .152 

DEVSECT: Device Table DSECT ,156 

DEVTAE: Device Table 157 

DIOSECT: Disk I/O Work Area .160 

DMSCCB: Command Control Block 162 

ECSSECT: DOS Simulation Control Block. .164 

EDCB: Edit Control Block .166 

ERDSECT: Error Handling Routine DSECT. .174 
EXTSECT: External Interrupt Work Area. .177 
EXTOAREA: External User Area ..... .179 

FCBSECT: Simulated OS Control Blocks . .180 

FCHTAB: Fetch Table 184 

FICL: First In Class Block .185 

FRDSECT: Free Chain Element Header 

Blocks .186 

FSCBD: File System Control Block , . . ,188 
FSTD: File Status Table Entry DSECT. . .189 

FSTSECT: File Status Table 190 

FVSECT: Fixed Variable Storage Work 

Area for CMS File System 191 

IHADECB: Data Event Control Block. . . .195 

lOSECT: I/O Interrupt Save Area 196 

KEYSECT: Disk Key Table DSECT for EDAM 

Simulation .197 

LERST: Loader Storage Area .198 

LOETAB and LOEPR: Logical Unit Block 

Table 202 



NICL: Number in Class 204 

NDCCN: Nucleus Constant Area ..... .205 

CFSECT: Major CSECT for all I/O 

Operation Lists .219 

OSFST: OS File Status Table. ..... .222 

CVSECT: Describes the First Few 

Locations of DMSOVS 224 

PCTAB: Program Check Option Table. . . .224 
PDSSECT: Directory Table for EPAM 

Simulation. .225 

PGHSECT: Program Interrupt Work Area . .226 
PIBADR: Program Information Block. . . .227 
PIB2TAB: Program Information Block 

Extension .228 

I PDBADR: Physical Unit Block Table. . . .229 
PDBCWNEH: Physical Unit Block Ownership 

Table .230 

SSAVE : System Save Area 231 

SOBSECT: Subset Work Area 233 

SVCSECT: SVC Interrupt Storage 234 

SVEARA: LTA and PP Save Area DSECT . . .238 
SYSCOM: System Communication Region. . .239 

SYSNAMES: Saved Systems Names 242 

TSCBLKS: TSO Control Blocks 243 

DSAVE: User Save Area 245 

DSEESECT: Oser Work Area 245 

SECTION 3. RSCS DATA AREAS AND CONTROL 

BLOCKS. . 247 

ASYNE: Asynchronous Exit Element ... .248 
BOFDSECT: SML Telecommunications Buffer. 249 
COMDSECT: Address Constants as Pointers. 250 

DEVTABLE: NPT Device Table 251 

FESEE: A Free Element on the Su^rvisor 

Element Cueue •• -252 

GIVE Reguest Table .253 

GIVEE: A GIVE Element 253 

ICE: An I/O Element 254 

lOTABLE: An I/O Table 255 

LIHKTABL: Link Table 256 

RECBLOCK: NPT Request Block 258 

ROOTE: Routing Table Entry ...... .259 

SVECTORS: Low Storage Definitions. . . ,260 

TAG: RSCS File Descriptor 263 

TAGAREA 265 

TAKE Request Table 265 

TABKDSEC: SML Unit Record Tank 266 

TABEA: A Task Save Area 267 

TASKE: A Task Element 269 

TCTDSECT: Task Control Table ..... .270 

APPENDIXES 273 

APPENDIX A. CP and RSCS EQUATE SYMBOLS .275 
VM/370 Device Classes, Types, Models, 

and Features, .276 

VH/370 EQUATE SYMBOLS — Machine Usage .278 
VM/370 EQUATE SYMBOLS — Extended 

Control Registers 279 

VH/370 EQUATE SYMBOLS — CP Usage. . . .280 
VM/370 Registers .283 

APPENDIX E. RSCS CONTROL AREAS 285 

AXS Monitor Control Area 286 

REX Monitor Control Area . ...... .287 

SBL Monitor Control Area 288 



vi IBM VM/370 Data Areas and Control Block Logic 



AEPEUEIX C. BSCS BEQUEST ELEMENTS. . . .291 
Comaand ALEET Element Eormat S1 292 

Operational Notes 292 

Command ALEBT Element Format A2 293 

Operational Notes 293 

Command ALEBT Element Format LO 294 

Operational Notes 294 

Command ALEBT Element Format LI 296 

Operational Notes 296 

Command ALEBT Element Format L2 297 

Operational Notes 297 

Command ALEBT Element Format L3 (also 
Message Alert Element) 298 

Operational Notes 298 

Ccmmand Bequest Element* * ^ ^ ^ ^ < , ,299 

Operational Notes 299 

File Bequest Element 300 

Operational Notes 300 

Line Alert Element 302 

Operational Notes 302 



Message Bequest Element 303 

Cperaticnal Notes 303 

Ecrt Table 304 

Cperaticnal Notes 304 

Terminate Bequest Element 305 

Cperaticnal Notes. ... 305 

AEEENDIX D. CMS EQDATE SYMBOLS 307 

CHS Osage Equates 308 

CMS Begister Equates 309 

AEEENDIX E. EATA ABEAS ANE CONTBOL 
EtCCK BEFEBENCES 311 

CE Control Blcck Beferences 312 

CMS Control Block Beferences 321 

BSCS Control Block Beferences 326 



Contents vii 



FIGURES 



Figure 1- CP Control Block 

Relationships .................1 

Figure 2. CMS Control Block 

Relationships ....137 



viii IBM VM/370 Data Areas and Control Block Logic 



Sammary of Amendments 

for SY20-0884-3 

VM/370 Release 6 PLC 1 



3800-1 PRINTER SUPPORT 



New: Documentation and Program Support 



of the active Monitor spool file 
frequently enough to support real time 
data reduction and display. 



VM/370 now offers support for the 3800-1 
unit as a dedicated virtual machine 
printer. The 3800=1 is also 
as a VM/370 spooling device. 



SECURITY JOURNALING SUPPCRT 



H ew ; Pi-Ograa Feature 



3850-2 VIRTUAL MACHINE MSS SUPPORT 



New: Program and Documentation 

VM/370 now supports the 3850-2 MSS to 
permit most operating systems that are 
running in the virtual machine 
environment access to data on MSS 
virtual volumes. 



PASSWORD-ON-THE-COMMAHD-LINE SUPPRESSION 



New: Program Feature 

VM/370 now supports the suppression of 
the entering of passwords on the command 
line for LOGON, AUTOLOG, and LINK. The 
intent is to force passwords to be typed 
upon a mask. The new support is 
specified via the SYSJRL macro in 
DMKSYS. It is optional and must be 
implemented at system generation time. 
Privilege class A users can use the 
JOURNAL operand of either the SET or 
QUERY commands. 



MULTIPLE ALTERNATE CONSOLE SUPPORT 



New; Program and Documentation 

VM/370 supports the specification of 
multiple alternate consoles at system 
generation time. 



MONITOR ENHANCEMENTS SUPPORT 



N ew ; Program and Documentation 

VM/370 supports the enhancement to the 

Monitor module which permits the analyst 

the option to specify periodic closing 



VM/370 now supports the journaling of 
LOGONS and AUTOLOGs specifying invalid 
passwords and the journaling of all 
linkages. This is accomplished via the 
generation of type 04, 05, and 06 
accounting records. The new support is 
specified in the SYSJRL macro in DMKSYS. 



4331 AND 4341 PROCESSOR SUPPORT 



New: Program and Documentation 



VM/370 supports 4331 and 4341 processors 

offering compatibility with the new 

model IDs as well as the S/370 RAS 
funcitcn subset. 



MISCELLANEOUS 

New; Documentation and Program 

The following features and enhancements 
are now supported by VM/370. 

• 3203-5 Unit 

• Special Messages facility 

• Trace Table size as a system 
generation option 

• Modification of Shared Segment 
handling 

• 3031 Alternate Processor 

• 12 and 16 Megabyte Processors 

• Directory hooks 



Summary of Amendments ix 



Suimary of Amendients 
for SY20-0884-2 
as updated by SN25-0461 
VH/370 Release 5 PLC 12 



YliRY PROCESSOR SUPPORTED BY VM/370 

New: Documentation and Program Support 



When a system has been generated for 
attached processor operations, use of a 
new command, VARY PROCESSOR 
OHLINE/OFFLINE, facilitates the 
transition to or from uniprocessor mode 
on the main processor. This command can 
be used to vary a specified processor 
offline or online without any serious 
disruption to system users. 
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Summary of Amendments 

for SY20-0884-2 

as updated by SN25-0453 

VH/370 Release 5 PLC 6 



ALTERNATE TRACK FOR 3340/3344 
NOW SUPPORTED BY VM/370 



New: Documentation and Program Support 

New code has been added for VM/370 
support of 3340/3344 alternate track 
facility. These changes affected the 
following modules: 

lOBLOK 
lOERBLOK 



Summary of Amendments xi 
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ACCTBLOK, ACNTBLOK 



ACCTBLOK: OSES ACCOONTING BLOCK 



ACCTBLOK provides header inforiation for spool files. The VMACCUHT field in the VHEtCK 
points to ACCTBLOK. 



I 
I- 

8 I 

I 

10 I 



ACCTDSEB 



ACCTACHO 



ACCTDIST 



Hexadecimal Field 
Displacenent Naae 





8 

10 



ACCTOSER DS 
ACCTACNO DS 
ACCTDIST DS 



CL8 
CL8 
CL8 



Field Description, Contents, Meaning 

Virtual aachine identification 
Virtual nachine accounting nuiber 
Virtual nachine distribution nuaber 



ACCTLENG EQD (*-ACCTBLOK) /8 Size of ACCTBLOK in doublewords {X»03») 



ACNTBLOK; ACCOONTING CARD BOFFEB BLOCK 

ACNTBLOK provides accounting and statistical information on each user that has used 
VH/370 facilities. The ARSPAC field in the Prefix Storage Area (PSA) points to the start 
of the chain of ACNTBLOKs. 



I 

I 

8 I 



ACNTCCW 



ACNTNEXT 



ACNTDATA 



58 I 



ACNTBACK 



Hexadecimal Field 
Displacement Name 




8 
C 


ACNTCCW DS 
ACNTNEXT DS 
ACNTDATA DS 


D 
F 
CL80 


5C 


ACNTBACK DS 


F 




ACNTSIZE EQU 


(♦-A 



Field Description, Contents, Meaning 

Punch CCB for accounting card 

Address of next ACNTBLOK in chain 

Accounting information (see "Format for User 

Cards") 
Address of previous ACNTBLOK in chain 



(♦-ACNTBLOK) /8 Size of ACNTBLOK in doublewords (X»OC») 
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ACHTBLOK 



• Format for User Cards 

The fields below represent the 80 bytes defined by ACKTEATA in the ACKTBLCK data area. 



ACNTDSER 



10 
10 
20 
28 
30 
38 
40 
<48 
50 
58 



ACNTDSER (cont.) 



ACNTNDH 



ACNTHOM (cont.) 



ACHTSTOP 



ACNTCONT 



ACNTTIHE 



■mr'-amrrtTiT H 
awBx « XJ.U 



ACHTPGHD 



ACNTPGWT 



ACNTIOCT 



ACNTPKCH 



ACHTLIHS 



ACNTCRDS 



I /////////a CN TH S 7 1 ///////////// 



/// ACNTRSV1 (cont.)////l/////////ACNTRS72///////////// 



/// A*1 ////I ACNTCODE | 
1 



Bexadecinal Field 
Cisplacement Name 



Field Description, Contti^ts, Heaning 







ORG 


ACNTDATA 


c 


ACNTDSER 


DS 


CL8 


14 


ACHTNDM 


DS 


CL8 


1C 


ACNTSTOP 


DS 


CL12 


28 


ACNTCONT 


DS 


IF 


2C 


ACNTTIME 


DS 


IF 


30 


ACNT?TIM 


DS 


IF 






ORG 


ACNTTIME 


2C 


ACNTDEVC 


DS 


XL4 


30 


ANCTNCYL 


DS 


1H 


34 


ACNTPGRD 


DS 


IF 


38 


ACNTPGHT 


DS 


IF 


3C 


ACNTIOCT 


DS 


IF 


40 


ACNTPNCH 


DS 


IF 


44 


ACNTLINS 


DS 


IF 


48 


ACNTCRDS 


DS 


1F 


4C 


ACNTRSV1 


DS 


2F 


54 


ACNTRSV2 


DS 


XL6 


5A 


ACNTCODE 


DS 


1H 




Card Codes for 
~DC 


ACNTCODE 
C«C^» 






DC 


C'xl' 






DC 


C»x2» 






DC 


C'x3' 



Virtual machine identification 
Virtual machine accounting nusber 
Date and time of accounting HMDEYYHHSS 
Number of seconds connected 
Billiseconds of processor time used 
Milliseconds of virtual prccesscr time used 



Device code (CTFM) ; see the DEVTYPE copy file 
Number of cylinders of T-disk space 

Total page reads 

Total page writes 

Virtual SIO count for nonspooled I/O 

Virtual card count for spooled punch 

Virtual line count for spooled printer 

Virtual card count for spooled reader 

Reserved for IBM use 

Reserved for IBM use 

Accounting card identification code 



User formatted accounting card 
Dser virtual machine accounting card 
User dedicated device accounting card 
Dser temporary disk space accounting card 



where; 

X = C if the card is initiated via a DIAGNOSE Code X'4C» 

X = if the card is initiated via CP command processing 



Section 1. CP Data Areas and Control Blocks 3 



ALOCBLOK 



ALOCBLOK: DASD CYLINDER ALLOCATION BLOCK 



ALOCBLOK provides infornation on the temporary disk space available to a virtual aachine, 
The RDEVALLN field in the RDEVBLOK points to the ALOCBLOK. 



10 



ALOCPNT 



I ALOCUSED I ALOCHAX 



ALOCNTMP I////////////////////////////////////////// 



ALOCHAP 



Eexadeciaal Field 
Cisplacenent Name 






ALOCPNT DS 


IF 


4 


ALOCOSED DS 


1H 


6 


ALOCMAX DS 


1H 


8 


ALOCNTMP DS 


1H 


A 


DS 


3H 


10 


ALOCHAP DS 


OF 



Field Description, Contents, Heaning 

Pointer to next ALOCBLOK on chain 
Nuiter of nonteiporary cylinders 
Haxiinm nunher of cylinders available 
Nuiber of ncnteaporary cylinders 
Reserved for IBH use 

Cylinder allocation bit Map 



Bits defined in ALOCMAP 

= Cylinder is available 

1 = Cylinder has been assigned 

Not e; The size of ALOCHAP is variable and depends upon the nuiber of 
cylinders on the device. Generally, the size of the ALOCBLOK is determined 
by the following formula: 



ALOCSIZE (doublewords) = 



(ALOCHAX+63) No. of Cylinder 

+ 2 = — ♦ header 

64 Bits per dcubleword 



where: 

ALOCHAX for 2305-1 

for 2305-2 

for 2314 

for 3330-1 

for 3330-2 

for 3330-11 

for 3333-1 

for 3333-11 

for 3340-35 

for 3340-70 

for 3350 

for all others = 



48 cylinders 
96 cylinders 
203 cylinders 
404 cylinders 
404 cylinders 
808 cylinders 
404 cylinders 
808 cylinders 
349 cylinders 
698 cylinders 
555 cylinders 
1 cylinder 



Note that any bits in the map that represent cylinders net present on 
the device are set to 1. 



For Temporary Disk Allocation Blocks 



ORG 
AL0CCYL1 DS 
AL0CCTL2 DS 



ALOCUSED 

1H 

1H 



First cylinder of T-disk area 
Last cylinder of T-disk area 



iltes defined in AL OCMAP 
X»00» = Cylinder is available 
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ALCCBLOK 

X»AA« = Cylinder has been allocated 

Note: The size of the T-disk ALCCHAP is variable and depends upon the 
nuBber of cylinders in the range AL0CCYL1 to AL0CCIL2. Generally, the size 
of a given block is determined by the following foraula: 

(AL0CCIL2-AL0CCYL1+1*? 
ALOCSIZE(double¥ords) =< > +2 = 

UuiRber of Cylinder (inclusive) 

> ♦ header 

Bytes per doubleword 
Note that bytes for cylinders that are not available are larked assigned. 



Section 1. CE Data Areas and Control Blocks 5 



BSCBLOK 

BSCBLOK; BINARY SYNCHRONOUS COM MUNI CATION CONTROL BLOCK 

BSCBLOK provides status, control information buffers (necessary for polling and 
addressing), and channel programs for 3270 reiote eguipnent. The BDEVESC field in the 
RBEYBLOK points to the BSCBLOK. 






r 




■- — n 

Bscsccm 1 


8 


ESCSCCW2 1 


10 


BSCSCCW3 1 


18 


BSCPCCW1 1 


20 


BSCPCC1I2 1 


28 


BSCPCCW3 1 


30 


Bscpccim 1 


38 


BSCECCH1 1 


40 


BSCECCW2 1 


48 


BSCOECCH 1 


50 


BSCSEL 1 B*1 1 


58 


B*2 


1 B*3 1 


BSCIHDEX I//////////BSCRESVD///////////I 


60 




BSCSPTR 


1 BSCAOSEB 1 


68 




BSCOCOPY 


1 BSCRSTRT 1 


70 


BSCCNT 1 


BSCSENSE 1 BSCRCVD | BSCSEND | 

1 


78 


//////BSC0SER1///////////I BSCRHOBN | 


80 




BSCTMRQ 


1 BSCRESP 1 1 
_ _ , 1 1 


88 






BSCREAD 1 
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ESCELOK 



Hexadecinal 


Field 






Displacement 


Name 









BSCSCCW1 


DS 


1D 


8 


BSCSCCB2 


DS 


1D 


10 


BSCSCCW3 


DS 


ID 


18 


BSCPCCW1 


DS 


ID 


20 


BSCPCCW2 


DS 


ID 


28 


BSCPCCH3 


DS 


ID 


30 


BSCPCCH4 


DS 


ID 


38 


BSCECCHI 


DS 


ID 


40 


BSCECCH2 


DS 


ID 


48 


BSCUECCfl 


DS 


1D 


50 


BSCSEL 


DS 


7X 


57 


BSCFLAG 


DS 


IX 



58 



59 
5A 

5C 
60 

64 
68 
6C 
70 
72 
74 
76 
78 
7C 
80 
84 
86 



B*1 



Bits defined in BSCFLAG 
BSCHYI EQu X'80» 
BSCENQ EQU X«40« 



BSCCOPY 


EQD 


X«20' 


BSCOPIED 


EQO 


X«10» 


BSCREGEN 


EQO 


X«08» 


BSCTSTRQ 


EQO 


X»04« 


BSCLOG 


EQU 


X«02» 


BSCSCAB 


EQU 


X«01» 


BSCFLAG 1 


DS 


IX 


Bits def: 


Lned 


in BSCF 


BSCETB 


EQU 


x"»'80« 


BSCIGN 


EQU 


X»40« 


BSCPAl 


EQU 


X'20» 


BSCIHBID 


EQU 


X«10« 


BSCFORCE 


EQU 


X'08« 


BSCHALT 


EQU 


X«04» 


BSCLISE 


DS 


IX 


BSCINDEX 


DS 


1H 


BSCRESVD 


DS 


4X 


BSCSPTR 


DS 


IF 


BSCADSER 


DS 


IF 


BSCDCOPy 


DS 


IF 


BSCRSTRT 


DS 


IF 


BSCCNT 


DS 


1H 


BSC SENSE 


DS 


1H 


BSCRCVD 


DS 


1H 


BSC SEND 


DS 


1H 


BSCDSER1 


DS 


IF 


BSCRROBN 


DS 


IF 


BSCTMRQ 


DS 


IF 


BSCRESP 


DS 


1H 


BSCREAD 


DS 


CL264 



Field Description, Contents, Heaning 

CCW for write reset operation 

CCfl for addressing or selection 

CCW for read response to selection 

CCW for write reset operation 

CCW for general/specific polling 

ecu for NOP command 

CCW for read text 

CCW for write error response 

CCW to transfer control to read CCW 

CCW for read response on time-out 

Addressing/polling entry 

ESCELOK flags 



response 
Enguened in data from station 
COPY function is active 
Initiate COPY function 
Regeneration error 
Ignore input processing 
Bypass FORCE message at logoff 
Second scan for write request 



BSCSIZE1 EQU 
BSCSIZE2 EQU 
BSCSIZE EQU 



B*2 ESCELOK flags 



Station transmitted tlock record 

Ignore block record 

Indicator to call DMKCFHBK 

Initial bid sequence required 

User FORCE in progress 

Halt I/O has been issued for this device 

B*3 Line coordinate for input area 

Index value for available space in input 

buffer 
Reserved for IBM use 
Write CCW string address and/cr address of 

buffer 
Address of active resource 
Address of COPY requestor's NICELOK 
Address of restart CCW string 
Retry count 

Sense bytes from remote station 
Expected received ACK (ACK-O/ACK-1) 
Sending ACK (ACK-O/ACK-1) 
Reserved for IBM use 
Address of active user in queue 
Pointer to TRQBLOK for poll delay 
Response buffer for selection 
Read buffer for polling 

*- (ESCREAD+1) Read buffer size in bytes 
(BSCREAD-BSCBLOK) ESC header size in bytes 
(*-ESCBLOK*7)/8 ESC blocksize in doublewords (XM9«) 
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BUFFER 



EDFFER 



BUFFER is a buffer area that contains console input to te used by CP. The VCCNBEUF field 
in the VCONCTRL block points to BUFFER. 



I 



88 I 



BUFHXT 



EUFIN 



EUFCHT 



Hexadecimal Field 
displacement Naie 




88 
8C 



BUFIH 


DS 


CL136 


BUFNXT 


DS 


1F 


BUFCST 


DS 


1F 



Bit s dgfined in BUFCHT 
BUFINLTH EQU ~ L«BUFIN» 

BUFSIZE EQU (*-BnFFER)/8 



Field Description, Contents, Heaning 

Input line 

Pointer to next byte in BUFFER 

Count of characters in input line 



Si2e of input line in bytes (136) 

Size of console buffer in doublewords (X'12*) 
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CCHBEC 

CCHBEC; CHANNEL CHECK HASDLER RECORD 

CCHREC provides statistical data for error recovery and/or error recording related to a 
previously performed channel operation that did not successfully complete. 





8 

10 

18 

20 

30 
38 
40 
48 
50 



1 C*1 


1 C*2 1 C*3 1 


C*** |///CCSi2REV/l C*5 |/C*6//I 


1 CCDATE 1 




CCCPOID 


1 CCHMDL 1 CCHBCEL I 


1 CCPROGir 1 


1 FAILAED 1 

• • 


1 FAILCCH 1 


1 FAILCSlf 1 




FAILECSH 


1 CCDEVTYE 1 


1 C*7 


1 CCHCOA 


f CCBCBCUA 1 CCHCLCGL | 


. 




CCHLOG 1 

• 



Hexadecimal 


Field 








Displacement 


Name 











CCRECTYP 


DS 


IX 


C*1 


1 


CCOPSYS 


DS 


IX 


C*2 


2 


CCSil 


DS 


IX 


C*3 


3 


CCSH2 


DS 


IX 


C*4 


4 


CCSi2RE? 


DS 


2X 




6 


CCESCKT 


DS 


1X 


C*5 


7 


CCRECNT1 


DS 


IX 


C*6 


8 


CCDATE 


DS 


1D 




10 


CCCPUID 


DS 


IF 




14 


CCHHDL 


DS 


1H 




16 


CCHHCEL 


DS 


1H 




18 


CCPROGID 


DS 


1D 




20 


FAILADD 


DS 


8H 




30 


FAILCCW 


DS 


ID 




38 


FAILCSH 


DS 


ID 




40 


FAILECSW 


DS 


IF 






ORG FAILECSW 






40 


IGPRGFLG 


DS 


CL1 






Bits def: 
CCHSIOB 


Lned 
EQU 


in IGPRGFLG 
X»80« 






CCHINTB 


EQO 


X»40» 






CCHTIO 


EQD 


X»20« 






CCHHIO 


EQD 


X»10» 






CCHSNSB 


EQD 


X»04« 






CCHCNTB 


EQD 


X«02« 






CCHNRYB 


EQO 


X»01» 





Field Description, Contents, Heaning 

Record type 

Operating system 

Switch 1 

switch 2 

Reserved for IBH use 

Record count 

Reserved for IBM use 

Date and time 

Processor identification 

Processor model number (for example, 

0158, 0168, etc.) 
Maximum length of machine extended 

logout area (model dependent) 
Dser identification 
Active I/O units 
Failing CCi 
Failing CSW 
Failing ECSU 



Program flag bits 



Start I/O bit 

Interrupt bit 

Test I/O bit 

Halt I/O bit 

Sense data stored bit 

Count valid bit 

No retry bit 
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CCHREC 



Bezadeciial Field 
Eisplacefflent Naie 



ai 


IGBLAME 


DS 


CL1 




Bits defined 
CCHCPO EQD 


in IGBLAME 
X«80» 




CCHCHHL 


EQU 


X»40' 




CCHSCDB 


EQO 


X«20» 




CCHSTG 


EQU 


X»10» 




CCHINTFC 


EQD 


X«08« 


42 


IG7ALIDB 


DS 


CL1 




Bits defined 
CCHINTFV EQO 


in IGVALIDB 
X»80» 




CCHBCV 


EQO 


X«10« 




CCHDS? 


EQD 


X»08» 




CCHCHDV 


EQD 


X»04» 




CCBCAV 


EQD 


X»02« 




CCHDAV 


EQD 


X«01» 


43 


IGTERMSQ 


DS 


CL1 




Bits def: 


Lned 


in IGTERHSQ 




COHPSYS 


"eqd 


X»CO» 




COMPSEL 


EQD 


X«80' 




COHPFES 


EQD 


X»40» 




CCHIOH 


EQD 


XMO' 




COMPID 


EQD 


X»00» 




CCHDI 


EQD 


X»08» 




Sequence 


Code 


! Bits 




RTCODEO 


EQO 


X»00» 




ETC0DE1 


EQO 


X»01« 




RTC0DE2 


EQD 


X«02» 




RTC0DE3 


EQD 


X»03» 




RTC0DE4 


EQO 


X«04» 




RTC0DE5 


EQO 


X»05» 




RTC0DE6 


EQD 


X»06' 




RTC0DE7 


EQD 


X»07» 


44 


CCDEVTYP 


DS 


1F 


48 


CCHANID 


DS 


CI1 


49 


CCHCOA 


DS 


CL3 


4C 


CCHCHCDA 


DS 


2X 


4E 


CCBCLOGL 


DS 


2X 




CCHSIZE 


EQD 


(♦-CCHREC) 


50 


CCHLOG80 


DS 


0CL112 


50 


CCHLOG70 


DS 


0CL24 


50 


CCHLOG60 


DS 


0CL24 


50 


CCHADDR 


DS 


IF 




CCHSIZE1 


EQD 


(♦-CCHREC) 


54 


CCHL0G45 


DS 


0CL96 


54 


CCHLOG35 


DS 


0CL24 



Field Description, Contents, Meaning 
Probable source of error 



Processor is source of error 

Channel is source of error 

Storage control unit is source of error 

Storage is source of error 

Control unit is source of error 



Validity indicator bits 



Interface address valid 
Sequence code valid 
Unit status valid 
Command address valid 
Channel address valid 
Device address valid 

Termination/sequence code bits 



System reset 

Selective reset 

Stop, Stack, or normal termination 

I/O interface inoperative 

Interface disconnect 

I/O error alert 



Retry code values 

for the constructed ECSU 



CP device type 
C+7 Channel identification 

Actual failing device address 
Address from machine location X»EA» 
Length of channel logout 

/8 Size in doublewords (X»0B») 

2880 channel - 112 bytes 

287C channel - 24 bytes 

2860 channel - 24 bytes 

Dnit address stored by integrated channel 

Size in bytes for integrated channel 

Kodel 145 integrated channel (96 bytes) 
Model 135 integrated channel (24 bytes) 
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CCPABH 

CCPAEM: COMMDNICATIOHS CONTROLLER PARAMETER LIST 

CCPARM provides control information used for loading and controlling the 370X 
Coiaunicaticn Controller Network Control Program, Emulation Program, and Partitioned 
Emulation Program and their attached resources. 



8 
10 
18 

on 
28 



r- -^ 




CCPKAHE 




I 


1 CCPADDR 




1 




CCPSIZE 




1 CCPPSIZE 




1 




CCPENTRY 




1 C*1 1 C*2 1 C*3 


l/c*V/l 




CCPSTOR 




i CCPHBFSZ ! CCPHBFNO 

1 


! 


C*5 


1 C*6 1 CCPMAXID 





CCPRESID 



Hexadecimal Field 
displacement Name 






CCPNAME DS 


CL8 


8 


CCPADDR DS 


1F 


2 


CCPSIZE DS 


IF 


10 


CCPPSIZE DS 


IF 


14 


CCPENTRY DS 


IF 


18 


CCPTYPE DS 


IX 




Bits defined 


in CCP 



19 
1A 



IB 
1C 
20 
22 
24 
25 



CCPTNCP EQD X«01» 
CCPTEP EQU X'02» 
CCPTPEP EQU X»03' 



CCPCAONE 


DS 


IX 


CCPCATHO 


DS 


IX 


Bits defined 


in CCPA 


CCPTYPE1 


EQD 


X«01' 


CCPTYPE2 


EQD 


X«02» 


CCPRSVI 


DS 


IX 


CCPSTOR 


DS 


IF 


CCPHBFSZ 


DS 


1H 


CCPHBFNO 


DS 


1H 


CCPPADO 


DS 


IX 


CCPPADI 


DS 


IX 



Field Description, Contents, Meaning 

CPNAHE specified in NABEHCE macro 
Origin of control program image 
Control program size in bytes 
Parameter list size in bytes 
Control program entry point address 
C*1 Control program type flag 



Network control program 
270x emulation program 
Partitioned emulation program 

C*2 First channel adapter type flag 
C*3 Second channel adapter type flag 



Channel adapter type 1 
Channel adapter type 2 



C*4 



Reserved for IBM use 

370x storage size specified (in bytes) 
Buffer size from HOST macro 
Number of buffers in read list 
C*5 First buffer pad count (in bytes) 
C*6 Subseguent buffer pad count 

HOST Values Reguired bi VH/370 SujE^ort for 370x 

CCPVPADO EQD 34 " 34-byte pad in first bisynchronous 

transmitter buffer 
CCPVPAD1 EQD 34 34-byte pad in subsequent buffers 

Highest resource ID defined 
Resource ID definition 

Definition treakdonn 

Resource type flag 

Resource initial status flags 

Subchannel address when in EP mode 



26 


CCPMAXID DS 


1H 


28 


CCPRESID DS 


IF 




ORG 


CCPRESID 


28 


CCPRSTYP DS 


IX 


29 


CCPRSTAT DS 


IX 


2A 


CCPRSTEP DS 


1H 



Section 1. CP Data Areas and Control Blocks 11 



CHXBLOK,CHyBLOK 

CHXBLOK AND CHYBLOK: VIRTUAL CHANHEL-TO-CHAHNEL ADAPTER CONTROL BLOCKS 

CBXBLOK and CHYBLOK provide the necessary control for a virtual machine using a virtual 
channel-to-channel adapter (CTCA) . The VDEVREAL field in the VDEVBLCK points to CHXELCK 
and CHYBLOK for virtual CTCAs- 




8 
10 
18 
20 
28 
30 
38 



1 — - — _ _ - _ _ ^ 

1 CHXOTHR 1 CHYOTHR | 


1 X*1 1 X*2 1 X*3 1 X*^ 1 Y*1 1 Y*2 | Y*3 | Y*4 | 


1 CHXNCCH 1 CHYNCCS | 


1 CHXRCNT 1 CHYRCNT | 


1 CHXSTAT 1 CHXYADD | CHYSTAT | CHYXADD | 


1 CHXIDAW 1 CHYIDAi | 


1 CHXCNCT 1 CHYCNCT | 


1 CHXDATN 1 CHYDATH | 

1 J 



Note: As indicated in the illustrated block, the CHXBLOK and CHYBLOK are interleaved 
with a 4-byte displaceient. The X-side VDEVELOK points to the +0 slot, the Y-side 
VDEVBLOK points to the +4 slot; however, once the virtual connection is lade, either side 
can be the X-side or the Y-side since this interleaved arrangement makes the control 
block references completely symmetrical. The dual DSECT definition allows the active 
adapter (defined to be the X-side, arbitrarily) to reference both adapter sides 



Field Description, Contents, Heaning 
X-side channel adapter block 



concurrently 


without k 


n owing whether it is 


Hexadecimal 


Field 








Displacement 


Name 
CHXBLOK 











CHXOTHR 


DS 


2F 




8 


CHXFLAG 


DS 


IX 


X*1 




Bits def 
CHBMNOP" 


ined 
EQU 


in CHXFLAG 
X'80» 






CHBB370 


EQU 


X'40» 






CHBATTN 


EQO 


X»20» 






CHBREST 


EQO 


XMO' 






CHBEOFL 


EQU 


X»08' 






CHBHIO 


EQU 


X»04' 






CHBiAIT 


EQU 


X»02' 






CHBCENT 


EQU 


X»01» 




9 


CHXCMDB 


DS 


IX 


X*2 


A 


CHXCMDT 


DS 


IX 


X*3 




Bits defined 
CHBCTNL EQO 


in CHXCMDT 

x'ao' 






CHBRDBK 


EQU 


X»20» 






CHBWEOF 


EQU 


XMO' 






CHBSCMD 


EQU 


X»08» 






CHBSADS 


EQU 


X»04» 






CHBHEAD 


EQU 


X»02« 






CHBWRIT 


EQU 


X»01« 





VMELCK address of Y-side adapter user 
X*1 Internal processing flags 



Modified HOP command issued (also in CHDT) 

CTCA operating in System/370 mode 

Attention pending from Y-side 

CTCA has been reset X-side and Y-side 

Force EOF to next READ instruction 

Halt I/O or halt device issued 

CPEXELOK available-for channel reconnect 

Channel end has been preserved on SIO 

Active CCW command byte buffer 

Active CCW command type (RD, WR, etc.) 



Control, other than NOP 

Read backward 

Write EOF 

Sense command byte 

Sense adapter status 

Read 

Write 
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Bexadeciial Field 
Displacefflent Name 



B 


CHXPKEY 


DS 


IX 


C 




DS 


ux 


10 


CHXNCCW 


DS 


2F 


18 


CHXHCNT 


CS 


2P 


20 


CHXSTAT 


DS 


IH 


22 


CHXIADD 


DS 


1H 


2a 




DS 


2H 


28 


CHXIDAH 


DS 


2F 


30 


CHXCNCT 


DS 


2F 


38 


CHXDATN 


DS 


2F 



CHXBLOK,CHYELCK 



Field Description, Contents, Meaning 

X*4 Virtual CAU protection key 

"Other" adapter control flags 

Next CCW fetch address (real) 

Eemaining CCi? data connt 

Device status accuBulation field 

Virtual address of Y-side adapter 

"Other" adapter control flags 

Active indirect data list word 

CPEXELOK for channel reconnect 

lOELCK address for deferred I/O interrupt 



CHBSIZE EQU (*-CHXBLOK) /8 Total block size in doublewords (X»08») 



CHYBLOK 



B 
C 
10 
18 
20 
22 
24 
28 
30 
38 



CHYOTHR 


DS 


2F 


CHYFLAG 


DS 


1X Y*1 


Bits def 
CHBMNOP 


ined 
EQD 


in CHYFLAG 
X»80' 


CHBM370 


EQD 


X«40' 


CHBATTN 


EQD 


X»20» 


CHBREST 


EQD 


X«10» 


CHBEOFL 


EQD 


X»08' 


CHBHIO 


EQD 


X»04« 


CHBWAIT 


EQD 


X'02' 


CHBEENT 


EQD 


X'01» 


CHYCHDB 


DS 


1X Y*2 


CHYCMDT 


DS 


1X Y*3 


Bits def 
CHBCNTL 


ined 

Iqd 


in CHYCMDT 

x»ao» 


CHBRDBK 


EQD 


X»20» 


CHBHEOF 


EQD 


X«10» 


CHBSCMD 


EQD 


X«08» 


CHESADS 


EQD 


X'04» 


CHBREAD 


EQD 


X'02« 


CHBiRIT 


EQD 


X»01» 


CHYPKEY 


DS 


IX Y*4 




DS 


ax 


CHYNCCU 


DS 


2F 


CHYRCNT 


DS 


2F 


CHYSTAT 


DS 


IH 


CHYXADD 


DS 


IH 




DS 


2H 


CHYIDAH 


DS 


2F 


CHYCNCT 


DS 


2F 


CHYDATN 


DS 


2F 



Y-side channel adapter tlock 

VMELCK address of X-side adapter user 
Y*1 Internal processing flags 



Modified NOP command issued (also in CMDT) 

CTCA operating in Systei/370 mode 

Attention pending from X-side 

CTCA has teen reset X-side and Y-side 

Force EOF to next READ instruction 

Halt I/O or halt device issued 

CPEXELOK available for channel reconnect 

Channel end has been preserved on SIO 

Active CCB command byte buffer 

Active CCi command type (RE, WR, etc.) 



control, other than NOP 

Read backward 

Write EOF 

Sense command byte 

Sense adapter status 

Read 

Write 

Virtual CAW protection key 

"Other" adapter control flags 

Next CCW fetch address (real) 

Remaining CCW data count 

Device status accumulation field 

Virtual address of X-side adapter 

"Other" adapter control flags 

Active indirect data list word 

CPEXELOK for channel reconnect 

lOELCK address for deferred I/O interrupt 
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CKPBLOK 



CKPBLOK: TELECOMHONICATIONS CHECKPOINT BLOCK 



CKPBLOK provides checkpoint information needed for VB/370 warn start recovery for 
3704/3705 Coiiunicaticn Controllers and enabled lines and resources. The BDEVCKPT field 
of the RDEYBLOK points to CKPBLOK. 



I CKPSIZE I CKPBMAX I//////////CKPRSV1////////// 



I 

8 I 
I- 

10 I 



CKPNAHE 



CKPBITS 



Hexadecimal Field 
Displacement Name 




2 
4 
8 
10 


CKPSIZE DS 
CKPBMAX DS 
CKPBSV1 DS 
CKPNAME DS 
CKPBITS DS 

CKPBKSZ EQU 


1H 

1H 

IF 

CL8 

OD 

(CK 



Field Description, Contents, Meaning 

Size of checkpoint block in dcublewords 
Number of resources checkpcinted 
Beserved for IBM use 
370x control program reference name 
Bit map of enabled lines or resources 



(CKPEITS-CKPBL0K)/8 Header size in doublewcrds 
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COKTASK 

CONTASK: CONSOLE I/O PACKAGE 

CONTASK contains data and control information pertinent to the control and communication 
between virtual and real terminal console tasks and command streams. The BDEVCON field 
of the RDEVBLOK and the NICQPNT field of the SICELOK point to COKTASK. 





CONPNT ! 


COKEEIN 


1 C*1 


1 C*2 1 CONTSKSZ | 


CONOSEB 


1 C0NCCW1 


1 C0NCCW2 


i C0NCC1J3 


1 CONCCflU 




CONDATA 





8 

10 
18 
20 
28 
30 



(Variable Length) 



Hexadecimal Field 
Displacement Name 



Eield Description, Contents, Heaning 

Pointer to next CONTASK 
Pointer to SAVEAREA for return 
C*1 CONTASK status control flags 



Generate CONTASK output 

Response expected from this CONTASK 

CONTASK is active on real device 

This is a control CONTASK only 

CONTASK contains device dependent data 

Retry operation in prooress 

Output data being split via BDE7LLEN 

CONTASK for synchronization only 

C*2 DMKQCN parameter flags (see "Appendix A. 
CP and RSCS Equate Symbols") 
CONTASK size in doublewords 
Address of 7MBLCK for destination user 
First console I/O CCU 



CCW data address 
CCW flag bits 
DIAGNOSE write control 
CCi byte count 



CCil command code 

Second console I/O CCIJ 

Third console I/O CC« 

Fourth console I/O CC\i 

Output data area (variable length) 

CONTSIZE EQD (*-CONTASK) /8 CONTASK size in doublewords 






CONPNT 


DS 


IF 


n 


CONRETN 


DS 


IF 


8 


CONSTAT 


DS 


IX 




Bits defined 


in CONSTA 




CONOUTPT 


EQD 


X»80» 




CONRESP 


EQU 


x»ao» 




CONACTV 


EQU 


X»20» 




CONCNTL 


EQD 


XMO« 




CONESCP 


EQD 


X»08« 




CONRTHi 


EQD 


X'Oi}' 




CONSPLT 


EQD 


X»02» 




CONSYNC 


EQD 


X»01' 


9 


CONPARH 


DS 


IX 


A 


CONTSKSZ 


DS 


1H 


C 


CONUSER 


DS 


1F 


10 


C0NCCW1 


DS 


ID 






ORG 


C0NCCW1 


10 


CONADDR 


DS 


1F 


14 


CONFLAG 


DS 


IX 


15 


CONDWC 


DS 


IX 


16 


CONCNT 


DS 


1H 






ORG 


CONADDR 


10 


CONCOHND 


DS 


IX 


18 


C0NCCi(2 


DS 


ID 


20 


C0NCCW3 


DS 


ID 


28 


C0NCCW4 


DS 


ID 


30 


CONDATA 


DS 


OC 
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COHTASK 



Hexadeciial Field 
Displaceient Naae 



Field Description, Contents, Heaning 



Bits redefined 



2A 
2C 
2£ 
30 
31 
32 
34 
35 
36 



30 
31 
33 
33 
3H 
35 
36 



CONSRID 
CONDEST 
CONRTAG 
CONSYSR 
COHEXTR 
CONTCHD 
CONFDNC 
CONDFLG 
CONDCNT 



ORG 

BS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 



in COHCCW for 370x network Control Program 

CONCCW3+2 

1H Source identifier 

1H Destination resource ID 

1H Request tag for this COHTASK 

IX 370x system response byte 

IX 370x extended response byte 

1H Bisynchronous terminal command modifier 

IX Basic device function control flags 

IX Basic device data control flags 

1H Text data length 



gits redefined for 3270 Remote Support 



ORG 
CONLABEL DS 
CONSTX 
CONESC 
CONCHD 
COHHCC 
CONSBA 



DS 
DS 
DS 
DS 
DS 
DS 




Return index value 

Start text character 

Escape character 

Command code for remote station 

Write control character 

Start buffer address 

Buffer address 
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COBTAELE 



COBTABLE: STOB&GE ALLOCATION TABLE 

COBTAELE laintains the status and ownership of each page frame of real storage for use by 
page managenent routines. The ACOEETBL field of the PSA points to COBTAELE. 



I 



COBFPHT 



COBEPNT 



8 I C*1 I COBSWPHT 
I 



COBPGPBT 



Eexadeciial Field 
Displacesect Nase 



COEFPNT DS 



1F 



Field Description, Contents, Keaning 
Pointer to next COBTAELE entry in queue 



Entry definition for Page Ownership 

OBG~ COBFPNT 
COB¥H DS 1F Pointer to ¥HELOK of page owner 



CORBPNT DS 
COBSWPNT DS 
COBPGPMT DS 



COBFLAG 



OBG 
DS 



1F 
IF 
IF 

CORSWPST 
12 



Bits defined in C OBF LAG 

COEIOLCK EQD ~X«80» 

COBCFLCK EQU X»aO« 

COEFLDSH EQD X»20» 

COBFBEE EQU X»10» 

COESHABE EQO X«08» 

COBBSV EQD X«04» 

COBCP EQD X»02« 

COBDISA EQD X«01» 



Pointer to previous COBTAELE entry in queue 
Pointer to SUPTABLE for page 
Pointer to EAGTAELE for page 



C*1 COBTAELE entry status flags 



Page locked for I/O or CCBLCHT is 

greater than 
Page locked by console function 
Page is in FLDSB list 
Page is in IBEE list 
Page is shared 
Page is reserved 

Page belongs to the control prograi 
Page disabled, not available 



E ntry Definition if Page Is Locked 

~OBG COBEPNT 
COBLCNT DS IF Page lock count for COBICLCK 

E ntry Definition if Page Is in Tr an sit 

OBG COBFLAG 
COBCODE DS 1X C*1 EASE operation code for DMKEAGIC 
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CPEIBLOK 



CPEXBLOK: CP EXECUTE BLOCK 



CPEXBLOK maintains register values and addressing inforiation (aodole address or entry 
point address) to handle a delayed transfer of control. Stacked CPEXELCKs are queued off 
DJJKDSPRQ. 



8 
10 



f 


CPEXFPNT 


1 


CPIXBPNT 




CPEXHISC 


1 


CPEXADB 






CPEXREGS 





EexadeciHal Field 
Displacement Name 



CPEXFPNT 


DS 


1F 


CPEXBPNT 


DS 


IF 


CPEXHISC 


DS 


IF 



Field Description, Contents, Heaning 

Pointer to next CPEXBLOK 
Pointer to previous CPEXBLOK 
Use varies with stacker 



Definition for DMKSTK and DMKDSP 
ORG CPEXHISC 





CPEXTYPE 


DS 


IX 




Bits def 
CPEXDEFR 


Lned 
"eqo 


in CPEXTYPE 
X'80» 




CPEXPRIO 


EQO 


X»40» 




CPEXLPSH 


EQO 


X*20« 






DS 


IX 




CPEXPROC 


DS 


1H 


c 


CPEXADD 


DS 


IF 


10 


CPEXREGS 


DS 


16F 




For CPEXREGS 
ORG 


Area 

CPEXREGS 


10 


CPEXRO 


DS 


IF 


ia 


CPEXRI 


DS 


IF 


18 


CPEXR2 


DS 


IF 


1C 


CPEXR3 


DS 


IF 


20 


CPEXR4 


DS 


IF 


24 


CPEXR5 


DS 


IF 


28 


CPEXR6 


DS 


IF 


2C 


CPEXR7 


DS 


IF 


30 


CPEXR8 


DS 


IF 


34 


CPEXR9 


DS 


IF 


38 


CPEXR10 


DS 


IF 


3C 


CPEXR11 


DS 


IF 


40 


CPEXR12 


DS 


IF 


44 


CPEXR13 


DS 


IF 


48 


CPEXR14 


DS 


IF 


4C 


CPEXR15 


DS 


IF 



Type of block on CPEXBLOK chain 



Deferred interrupt request 

CPEXBLOK with priority 

Load PSW to go to execution address 

Reserved for IBH use 

Address of processor related to block 

Return address 
Execute registers 



Registers through 15 



CPEXSIZE EQD (*-CPEXBLOK) /8 Size in doutlewords (X»OA») 
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EDBBEC 

EDBREC: RECOHriGDH&TIOK HACBO 

DBRREC is used in the SVC 76-initiated error recording process for type 60 TASD dump 
restore (DDE) dynaiic device reallocation records- The reallocation records contain the 
replaceaent of the virtual "FROM" and "TO" control unit addresses (CDA) by the real 
addresses of the real DASD devices. 



f 1 

I DDRKEYS | D*1 |/D*2/|/D*3/|/E* VI//EDHSPE1//////// 



8 I DDRDTEH | DEBTHEN 



10 I DDRCPID 



to I JJJJ 1A<J\JJ^ 



20 I DDRV0L1 ! EDR70L2 



28 I DDRV0L2 (cont.) |D*5 | DDRCDA1 



30 I DDRDEV1 |D*6 | EDRCDA2 
I 

38 I DDRDEV2 | 

t — 1 



Bexadecinal 


Field 










Eisplacenent 


Naie 













DDRKEYH 


DS 


1H 






2 


DDRSUS1 


ED 


1C 




D*1 


3 


DDRSWS2 


DS 


1C 




D*2 


4 


DDRSWS3 


DS 


1C 




D*3 


5 


DDRRECKT 


DS 


1C 




D*4 


6 


DDBSPE1 


DS 


IB 






8 


DDBDTEH 


DS 


IF 






C 


DDBTMEN 


DS 


IF 






10 


DDRCPID 


DS 


2F 






18 


Device Dependent Data 
DDBJOB DS 8X 




20 


DDRY0L1 


DS 


6X 






26 


DDRV0L2 


DS 


6X 






2C 


DDRDEVP1 


DS 


IX 




D*5 


2D 


DDRCUA1 


DS 


3X 






30 


DDRDEV1 


DS 


4X 






34 


DDRDEVP2 


DS 


IX 




D*6 


35 


DDRCDA2 


DS 


3X 






38 


DDRDEV2 


DS 


HI 








DDRSIZE 


EQD 


(*- 


DDBREC) 



Field Description, Contents, Heaning 

Type and operating system 

Switch byte 

Reserved far IBM use 

Reserved for IBii use 

Reserved for IBM use 

Reserved for IBM use 

Date 

Time 

Processor identification and model number 



Job using FROM device 

Volume serial FROM device 

Volume serial TO device 

Device identification of FROM DASD 

Primary CDA of FROM device 

Device type FROM device 

Device identification TO DASE 

Primary CDA of TO device 

Device type of TO device 

DDR record size 
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DMPINREC 



DBPINREC: DUMP FILE INFORHATION BECORD 



DBPIHREC retains vital systen register and storage location values necessary for the 
CPDOBP file. See also DMPKYREC. 



I 



DHPGPRS 



40 

80 

AO 
A8 
BO 
68 
CO 

1C0 
1C8 







• 


1 ■ ■ ' ' ... .,,,.. , 

1 DHPCRS 1 


1 DHPFPRS 1 


1 DMPTODCK 1 


1 DMPCPUTH 1 


1 DHPCKCOH 1 


1 S*1 


|/S*2//| DHPPROCA 1 


DHPSISRV 1 

• 


1 DHPLCORE 1 
1 I 




DHPPRFRG 1 


EHPABEHD | 


I 


DHPPGHAP 


J 



Bezadeciaal Field 
Eisplaceient Nane 






DHPGPHS 


DS 


16F 


40 


DMPCRS 


DS 


16F 


80 


DMPFPRS 


DS 


4D 


AO 


DMPTODCK 


DS 


ID 


A8 


DMPCPOTM 


DS 


1D 


BO 


DMPCKCOM 


DS 


ID 


B8 


DMPFLAG 


DS 


IX 



B9 

BA 

BC 

CO 

ICO 

1C4 

1C8 



Bii§ defined in DMPFLAG 
HALFPAGE EQU X»80» 



DMPRS71 DS 
DMPPROCA DS 
DMPSYSRV DS 
DMPLCORE DS 
DMPPRFHG DS 
DMPABEND DS 
DMPPGMAP DS 



1X 

1H 

1F 

256X 

1F 

IF 

4096B 



Field Description, Contents, Meaning 

16 general registers 
16 control registers 
Four floating-point registers 

(if floating-point feature is installed on 
nachine) 
Tiae-of-day clock 
Processor tiaer 
Tiie-cf-day clock coaparatcr 
S*1 Flag byte 



Hhen on, last record in DUMP file is 2K 

S*2 Reserved for IBM use 

Abending processor address 
System generated storage size 
Absolute storage locations through 255 
Prefix register 

Abend code for failing processor 
Bit lap indicating which pages appear in the 
DDMP file (each bit represents a 4K block) 
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DHEKYBEC, DMPTEREC 



BMPKYREC: DUMP FILE KEY STORAGE RECORD 



DMPKIREC contains the storage keys of each 2K block of main storage at the time of S7C 
or a PSi restart condition. DHPKYREC and CMPINREC are used for debugging operations. 



|S*1 I 



DHPKEYS (4096 bytes) 



Hexadeciaal Field 
Cisplacement Name 



DMPKEYS DS 



DMPKEY 



ORG 
DS 



4096X 

DMPKEYS 
1X 



Field Description, Contents, Meaning 
Main storage keys 

S*1 Storage key for each 2K block 



DMPTBREC: DOMP FILE SYMBOL TABLE RECORD 



DMPTBEEC is a listing of all entry points in the system and their locations. 



I 

8 i 

I 

10 I 



DMPSYMNM 



DMPSYMVA 



DMPSYMES 



Hexadecimal Field 
Displacement Name 



c 


DMPSYMEN 


DS 


341XL12 






ORG 


DMPSYMEN 





DMPSYMNM 


DS 


CL8 


8 


DMPSYMVA 


DS 


A 



Field Description, Contents, Meaning 
Symbol table entries 



CSECT or entry point name 

Location in main storage of this symbol 
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ECBLOK 

ECBLOK; EXTENSION TO VMBLOK FOB VIBTDAL MACHINE WITH BELOCATE 

ECBLOK provides an extension to the VMBLOK for virtual lachine operation in Systei/370 
extended control mode. The VMECEXT field of the VHBLOK points to ECELCK. 




8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 



r- 


EXTCBO 


, 

1 EXTCB1 1 




EXTCfi2 


1 EXTCB3 1 




EXTCR4 


j EXTCR5 1 




EXTCB6 


1 EXTCB7 1 




EXTCR8 


1 EXTCfi9 1 




EXTCRIO 


1 EXTCB11 1 




EXTCR12 


1 EXTCB13 1 




EXTCR14 


1 EXTCB15 1 




EXTSHCBO 


1 EXTSHCB1 1 




EXTSHLEN | EXTVSEGS 


1 EXISTOLD 1 




EXTSHSEG 


1 EXTSEGLN | EXTABCH | 




EXTPEBAD 


1 EXTPEBCD 1 EXTCOPY | 


1 EXTCPTMB 1 




EXTCPTBQ 


1 EXTCCTRQ 1 



Bexadecinal Field 
Displacement Name 






EXTCBO 


DS 


IF 


4 


EXTCfil 


DS 


IF 


8 


EXTCB2 


DS 


IF 


C 


EXTCR3 


DS 


IF 


10 


EXTCB4 


DS 


IF 


14 


EXTCB5 


DS 


IF 


18 


EXTCR6 


DS 


IF 


1C 


EXTCfi? 


DS 


IF 


20 


EXTCB8 


DS 


IF 


24 


EXTCB9 


DS 


IF 


28 


EXTCBIO 


DS 


IF 


2C 


EXTCB11 


DS 


IF 


30 


EXTCB12 


DS 


IF 


34 


EXTCB13 


DS 


IF 


38 


EXTCB14 


DS 


IF 


3C 


EXTCB15 


DS 


IF 



Field Description, Contents, Meaning 

Virtual control register 0; architecture 

controls 
Virtual control register 1; segment table 

pointer 



Virtual control registers 2 through 15 
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ECBLCK 



Hexadecimal Field 
Cisplacement Name 



40 


EXTSHCRO 


DS 


1F 


44 


EXTSHCR1 


DS 


IF 


48 


EXTSHLEN 


DS 


1H 


4A 


EXTVSEGS 


DS 


1H 


4C 


EXTSTOLD 


DS 


IF 


50 


EXTSHSEG 


DS 


IF 


54 


EXTSEGLN 


DS 


1H 


56 


EXTARCH 


DS 


1H 


58 


EXTPERAD 


DS 


IF 


5C 


EXTPERCD 


DS 


1H 


5E 


EXTCOPY 


DS 


1H 


60 


EXTCPTHR 


DS 


ID 


68 


EXTCPTRQ 


DS 


1F 




EXTCCTRQ 


DS 


1F 




EXTSIZE 


EQD 


(* 



Field Description, Contents, Meaning 

Shadow control register 

Shadow control register 1 

Length of shadow SEGTABLE in bytes 

Length of virtual SEGTABLE in bytes 

Control register 1 value ccrrespcnding to 

tables 
Real address of shadow SEGTABLE 
Length of shadow SEGTABLE in doublewords 
Architecture control index 
Address of instruction PER interrupt 
PER code to be reflected 
Length code from active SEGTABLE entry 
Virtual processor timer 
Address of TRQBLOK for processor timer 
Address of TRQBLOK for clock comparator 



(*-ECBL0K)/8 ECBLCK size in doublewords (X'OE») 



Section 1. CP Data Areas and Control Blocks 23 



EHRBLOK 



EPRBLOK: ERROR BLOCK USED TO BUILD OER/MDR 



ERRBLOK contains data describing an error condition such as a channel failure or a device 
failure. 



I ERRKEY 

I 

8 I ERRTIME 



I /E* 1// 1 //////////ERRR S V2//////////// 1 

1 

I 



I 



ERRDJTE 



10 I 
I 

18 I 
I 

20 I 
I 

30 I 



ERRCCW 



I 



ERRVOLID 



I E*2 I E*3 I 
1 



ERRPARH 



ERRIOB 



70 I 



ERHIOER 



Hexadeciial Field 
Bisplacement Naie 






ERRKEY 


DS 


3X 


3 


ERRS71 


DS 


IX E*1 


4 


ERRRSV2 


DS 


IF 


8 


ERRTIME 


DS 


IF 


C 


ERRDATE 


DS 


IF 




ERRHEADR 


EQD 


(♦-ERRBLOK) 


10 


ERRCCH 


DS 


ID 






ORG 


ERRCCW 


10 


ERRMIOB 


DS 


(lOBSIZE)D 




ERRMIOER 


DS 


(lOBRSIZE)D 






ORG 


ERRCCW 


10 


ERRCCNT 


DS 


2X 


10 


ERRCONT 


DS 


oc 


18 


ERRVOLID 


DS 


6X 


IE 


ERRSDR 


DS 


IX E*2 


IF 


ERRCORR 


DS 


IX E*3 


20 


ERRPARM 


DS 


2D 


30 


ERRIOB 


DS 


(lOESIZE)D 


70 


ERRIOER 


DS 


(lOERSIZE) D 




ERRSIZE 


EQD 


(♦-ERRSIZE)/ 



Field Description, Contents, Heaning 

Key used to determine CER/BDR processing 
Reserved for IBH use 
Reserved for IBH use 
Time record was built 
Date record was built 

Size of header in bytes 

Failing CCW 



Copied lOELCK 
Copied lOERELOK 



Size of COHTASK data buffer 

COHTASK data buffer (variable length) 

Volid of failing device 
SERFLAGS from SDRBLOK 
Correlation count for HDR record 
Device dependent parameter string 
Copied lOELCK, see ICBLOK for details 
Copied lOERELCK, see IGERBECK fcr details 

EEREtCK size in doublewords 



24 IBM VH/370 Data Areas and Control Block Logic 



lOELCK 



lOBLOK; I/O TASK CONTROL BLOCK 

lOBLOK contains information required to perform I/C operations. The I/O request 

initiator for the I/O operation is either a CP-initiated or virtual machine-initiated 

event. There are five pointers to the lOELOK: ECEIICB field of the BCHELOK, ECHFICE 

field of the RCDBLOK, HDEVAIOB field of the EEEVBLOK, VDEVFIOE field of the VDEVELOK, 
BDEVFIOB field of the RDEVBLOK, 



10 
18 
20 
28 
30 
38 



r ■ ■" ' " " 

1 lOBRADD 11*1 


11*2 1 


lOBLIBK 1 


1 lOBFPNT 


1 


lOEEPBT 1 


1 lOBCYL 1 lOBVADD | 


lOEBISC 1 


1 lOBUSER 


i 


lOEIBA i 


1 lOBCAW 


1 


lOEECAW 1 




lOBCSW 




1 lOBIOER 


I 


I0EHISC2 1 

■ 


1 1*3 1 1*4 I//I0BRSV2//I//////////I0EBSV3////////////I 

L J 



Eexadecimal Field 
displacement Name 






lOBRADD DS 


1H 


2 


lOBFLAG DS 


IX 




Bits defined 
lOBCP EQO 


in lOEFLAG 
X«80« 




lOBRSTRT EQO 


X«40« 




lOBSPLT EQD 


X«20» 




lOBPAG EQD 


X»10« 




lOBRELCU EQD 


X«0«* 




lOBERP EQD 


X»04» 




lOBRES EQO 


X»02» 




lOBHVC EQO 


X«01« 



Field Description, Contents, Meaning 

Real device address for SIC 
1*1 lOELCK flags 



CP-generated I/O operation 
Restarted operation - lOBRCAi 
DASE - CP split seek operation 
lOELCK created for paging I/C 
Control unit released at initiation 
I/O task is under control cf ERF 
I/O task has been reset 
I/O initiated via DIAGNOSE instruction 



lOBSTAT DS 



IX 



1*2 lOELCK status 



Siis defined in lOESTAT 

lOBFATAL EQD X»80» 

lOBFLT EQD X»40» 

lOBPATHF EQO X»20« 

lOBMINI EQD X«08» 

lOBALTSK EQO X»04» 

I0BCC3 EQD X»03» 

I0BCC2 EQO X»02» 

I0BCC1 EQO X«01» 

lOBCCO EQD X»00» 



Dnrecoveratle error in this I/O operation 
lOELCK queued pending completion of a MSS 

cylinder fault 
Path is fixed, use ICBRADD value 
This is a mini-IOBLOK 
DASE channel program has seek to alternate 

track 
Processing CC 3, not available 
Processing CC 2, channel busy 
Processing CC 1, CSW stored 
Processing I/O interrupt 
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lOBLOK 



Hexadecimal Field 
Eisplacement Naie 



39 



lOBLINK DS 
lOBFPNT DS 
lOEBPNT DS 



IF 
1F 
1F 



lOBMSIZE EQU (*-IOBLOK) /8 



10 


lOBCYL 


DS 


1H 


12 


IOB¥ADD 


DS 


1H 


ia 


lOBMISC 


DS 


IF 


18 


lOBDSER 


DS 


IF 


1C 


lOBIRA 


DS 


1F 


20 


lOBCAW 


DS 


IF 


24 


lOBRCAH 


DS 


IF 


28 


lOBCSW 


DS 


ID 


30 


lOBIOER 


DS 


1F 


34 


I0BMISC2 


DS 


IF 


38 


lOBSPEC 


DS 


IX 



1*3 



Bitjs defined in l OBSPEC 

lOBTIO ~EQO x"»80» 

lOBHIO EQO X«40» 

lOBSIOF EQO X*20» 

lOBIHSTK EQO X»10» 

lOBONSL EQO X«08» 

lOBCOPY EQO X»04« 

lOBSENS EQO X»02' 

lOBTRPHD EQO X»01» 



IOBSPEC2 I>S 



4X 



Bits defined in I0ESPEC2 

lOBWRAP EQO X»80» 

lOBCLN EQO X»a0» 

lOBONREL EQO X»20» 

lOBDC EQO X»10« 

lOBSHSIO EQO X»08» 

lOBREL EQO X»0a» 



3A 


I0BRSV2 DS 


1H 


3C 


I0BRSV3 DS 


IF 




lOBSIZE EQO 


(*-IOB 




For CP lOBLOKs 
ORG 


lOBVADD 


12 


lOBRCNT DS 


1H 



Field Description, Contents, Meaning 

Pointer for nultipath lOELCK chain 
Pointer to next lOBLCK in queue 
Pointer to previous lOBLOK in queue 

Multiple path lOBLOK size in dcublewcrds 
(X'02') 

DASE - seek cylinder for this ICELOK 

Virtual device address 

Ose varies according to caller 

Pointer to VMBLCK of user 

lOELCK interrupt return address 

Pointer to CCW chain 

Pointer to restart CCW chain 

Real CSH for I/O operation 

Pointer to lOERELOK with sense byte 

Ose varies according to caller 

lOELCK special requests flag 



lOELCK request for a TIO 

lOBLCK request for a HIO 

Virtual SIO fast release 

Shut dO¥n SER function 

lOELCK resulting froa unsolicited interrupt 

I/O block associated with a COPY request 

Sense operation for COPY request 

Virtual trace pending on this I/O block 

1*4 lOBLCK special reqiiests flag second byte 



Input/output task for ADTOPCLL wrap list 
VDEVELOK locked when CCW get control 
Input/output task contains release, DBKDRT 

aust process 
Onit check status 

Noraal sense operation in progress 
Channel prograi contains CP release 

Reserved for lEH use 
Reserved for IBH use 

lOELCK size in doublewords (X*08») 



Retry count 
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lOEEELCK 

lOERBLOK: I/O ERROR IHFORHATIOH BLOCK 

lOERELOK contains information related to I/O and channel errors. This entails error 
retry, operator message information, and SDR (Statistical Data Recording) lOERELOK 
related to I/O eguipaent. There are three pointers to the ICERBLCK: REEVIOER field of 
the RDEVBLOK, 7DEYI0ER field of the 7DEVBL0K, lOEIOER field of the ICBLCK. 




8 
10 
18 
20 
28 
30 

50 



1 lOERPNT 1 


ICERLCC 


1 lOERDW 1 lOERHSG 


1 1*1 1 1*2 1 1*3 


1 lOERiDR 


! lOERCSW 


I lOERCCW 


! lOEREXT 1 lOERCCH | 1*H 


( /////lOER S V 1/////// 


1 lOERBJTJ 





additional Sense Data Area 

— or — 
XOBR3211 Extension 

— or — 



Hexadecimal Field 
Displacement Name 






lOERPNT 


DS 


IF 


4 


lOERLOC 


DS 


IF 


8 


lOERDW 


DS 


1H 


A 


lOERHSG 


DS 


XL3 






ORG 


lOERHSG 


A 


lOERNDM 


DS 


IX 


B 


I0ERIND3 


DS 


1X 



His defined in I0ERIHD3 

lOEEIGH EQO X'80» 

lOERETRY EQU X»aO' 

lOERCAN EQD X«20» 

lOEREC EQD XMO« 

lOERDASD EQD X»08» 

lOERDEC EQD X«04« 

lOERIHFO EQD X»02» 

lOERACT EQO X'01« 



Field Description, Contents, Heaning 

Pointer to next lOERELOK 

Address of CCWs used in recovery 

Size (in donblewords) of storage needed to 

construct CCis 
Communications with error recording 

processor and message writer 

Breakdown for DMKHSW 

Message numter for message routine 

Indicators for message routine 



Allow IGKORE response 

Allow RETRY response 

Allow CASCEL response 

Error occurred during recovery action 

Home address is present 

Operator decision is necessary 

Informational message 

Operator action is reguired 
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lOEBELOK 



Hexadecinal Field 
Eisplacement Nane 



F 
10 
18 
20 



20 
26 

2C 



I0ERIND4 DS 



IX 



Sits defined in I0ERINJD4 

lOERIGNR EQO x"»80» 

lOERSTRT EQO X«40» 

lOERCNCL EQO X»20» 



I0ERFLG1 DS 



IX 



Bits defined in I0ERFLG1 
lOERPEND EQO X'80» 



lOERCLN 


EQO 


X'40» 


lOERERP 


EQO 


X»40» 


lOERFSR 


EQO 


X«20» 


lOERDEPD 


EQO 


X»20» 


lOERBSR 


EQO 


X»10» 


lOERDERD 


EQO 


X»10» 


lOERERG 


EQO 


X«08» 


lOERXERF 


EQO 


X«08' 


lOERORA 


EQO 


X«04« 


lOERSOPP 


EQO 


X«02» 


lOERVLD 


EQO 


X»01» 


I0ERFLG2 


DS 


IX 


Bits def; 

ioerstat' 


Lned 

"eqo 


in I0ERFLG2 
X«8G» 


lOEftffA 


EQO 


X» 40' 


lOERCAL 


EQO 


X«20» 


lOERECF 


EQO 


XM0» 


lOERRBK 


EQO 


XM0« 


lOERREW 


EQO 


X»08» 


lOERCYLR 


EQO 


X«04» 


lOERMSW 


EQO 


X»04» 


lOERCEMD 


EQO 


X'02» 


I0ERY0L1 


EQO 


X»01» 



lOERWRK DS IX 

lOERADR DS ID 

lOERCSW DS ID 

lOERCCi DS ID 





ORG 


lOERCCH 


IOER?SER 


DS 


CL6 


lOERLEN 


DS 


1H 


I0ERFLG3 


DS 


IX 



Bits defined in I0ERFLG3 
lOERREAD EQO X'80' 





lOERALTR 


EQO 


X»MO» 




lOERRDRO 


EQO 


X'20» 


2D 


I0ERSV1 


DS 


XL3 


30 


lOERSNSZ 


EQO 


32X 


30 


lOERDATA 


DS 


(IERSNSZ/8)D 






ORG 


lOERDATA 


30 


lOERECSW 


DS 


IF 


34 


lOERCHAN 


DS 


IX 




lOEREND 


DS 


OF 



Field Description, Contents, Beaning 
Indicators for aessage writer 



Operator responded "ignore" 
Operator responded "retry" 
Operator responded "cancel" 

1*1 Flag tyte fcr error recovery routines 



Pending device end interrupt frci interrupt 

request 
Tape cleaning in progress 
Spooling - error routine in control 
Forward space record being executed 
Spooling - waiting for device end 
Backspace record being executed 
Spooling - device end received 
Erase gap command in progress 
Spooling - error routine getting OBR data 
Opposite recovery action in progress 
CCW has suppress data transfer bit on 
Read opposite recovery successful 

1*2 Second flag byte for error recovery program 
use 



Statistical data being unleaded 

EASE ho»e address being read 

Standalone recalibrate being executed 

Error correction function 

Read backward ccamand 

Tape rewind being executed 

Cylinder (in sense byte) has been relocated 

Message writer is active 

Intensive recording mode 

EASE volid being read 

1*3 Miscellaneous work byte 

Home address for DASD devices 

CSW associated with error 

Sense CCB used to sense the real device 

Breakdown of sense CCW field 

Volume serial number for statistical data 

Number of sense bytes present 

1*4 Third flag byte for SDR use 



SER READ operation flag 

Alternate track retry is in progress 

Read home address, read only is in progress 

Reserved for IBM use 

Number of sense bytes supported 
Sense bytes associated with error 

Breakdown fcr channel check handler 
FCSS information from channel Icgout 
Channel type flag 

Label for end of lOERBLOK 
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lOEBBLCK 



Hexadecimal Field 
Cisplaceaent Naie 



50 



XOBR3211 



Field Description, Contents, Meaning 

Area where additional sense bytes may 
be appended to lOEBBLOK. The format 
for one of these is described in 
''XCER32'i1: Extended Oatbcard Becording 
Block" later in this section. 



• Channel Check Reflection Extension 



50 I 

I- 

58 I 

I- 
60 j 

I- 
68 I 



lOERCCRL 



lOEBCCBA 



lOEBCOID 



I lOERCHDL I lOERHCEL 



J.U£«UJ.U 



lOERFlED 



78 
80 
88 
90 
98 



1 1 

1 lOERCCCW 1 
1 i 


1 — 1 

1 lOEBCCSU 1 




lOERZCSW 


1 lOERDTIP 1 


11*5 1 


lOERCCUa 


1 lOERHCDA 1 lOERLOGL \ 


• 




lOESCLOG 1 



Hexadecimal 


Field 






Displacement 


Name 






50 


lOERCEIT 


DS 


OD 


50 


lOERCCRL 


DS 


F 


54 


lOERCCRA 


DS 


F 


58 


lOERCDID 


DS 


F 


5C 


lOERCMDL 


DS 


H 


5E 


lOERMCEl 


DS 


H 


60 


lOEROID 


DS 


D 


68 


lOERFADD 


DS 


8H 


78 


lOERCCCW 


DS 


D 


80 


lOERCCSW 


DS 


D 


88 


lOERZCSi 


DS 


F 


8C 


lOERDTYP 


DS 


F 


90 


lOERCHID 


DS 


CL1 



1*5 



Channels defined in lOERCHID 
IOER2860 EQO X»05» 
IOER2870 EQO X«06» 
IOERB80 EQO X»07« 
IOERS80 EQO X'08« 



91 


lOERCCOA 


DS 


CL3 


sn 


lOERMCDA 


DS 


CL2 


96 


lOERLOGL 


DS 


CL2 



Field Description, Contents, fleaning 

Extension used only for channel check 

reflection 
Length of channel check record 
Address of channel check record 
Processor identification 
Processor model number (for example, 

0158, 0168, etc.) 
Maximum length of machine check 

extended logout area (model-dependent) 
Oser identification 
Active input/output units 
Failing CCW 
Failing CSi 
Failing ECSi 
CP device type 
Channel identification 



Standalone selector (2860) 
Standalone multiplexer (2870) 
Standalone block multiplexer (2880) 
Selector channel (2880) 

Actual failing device address 
Address from processor locaticn X'BA* 
Length of channel logout 
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lOERBLOK 



Bexadeciial Field 
Displacefflent Naae 



98 


lOERCLOG 


DS 


F 






ORG 


lOERCLOG 


98 


IOERLG80 


DSCL112 






ORG 


lOERCLOG 


98 


IOERLG70 


DS 


CL24 






ORG 


lOERCLOG 


98 


IOERLG60 


DS 


CL2a 






ORG 


lOERCLOG 


98 


lOERADDR 


DS 


F 


9C 


IOERLG33 


DS 


CL640 






ORG 


IOERLG33 


9C 


IOERLG45 


DS 


CL96 






ORG 


IOERLG33 


9C 


IOERLG35 


DS 


CL24 



Field Description, Contents, Heaning 
Channel logout area 

2880 channel (112 bytes) 

2870 channel (24 bytes) 

2860 channel (24 bytes) 



Unit address stored by integrated channel 
3033 channel (610 bytes) 



lOERSIZE EQO 



115 integrated channel (96 bytes) 

135 integrated channel (24 bytes) 
(*-I0ERBL0K)/8 lOERELOK size in doublewords 
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IBMELCK 



IRMBLOK: INTENSIVE ERROR RECORDING MODE BLOCK 

IRHBLOK provides the inforaation necessary for the implementation of intensive recording 
mode via CP SET RECORD command. Intensive recording mode allows the recording of unit 
check errors from a specified device whose sense data matches the values selected. 



I/////IRMFWPTR////////////I IRHBLiDD | IRBLHT 



8 1 1*1 I 1*2 I 1*3 I I*U I 



IRBLHTCT I 



1*5 I 1*6 



Hexadecimal 


Field 








Displacement 


Name 











IRMFHPTR 


DS 


1F 




4 


IRMRLADD 


DS 


1H 




6 


IRMLHT 


DS 


1H 




8 


IRMBYT1 


DS 


1X 


1*1 


9 


IRHBIT1 


DS 


1X 


1*2 


A 


IBMBYT2 


DS 


1X 


1*3 


B 


IRMBIT2 


DS 


IX 


1*4 


C 


IRHLHTCT 


DS 


1H 




E 


IRHMAXCT 


DS 


1X 


1*5 


F 


IRHFLG 


DS 


1X 


1*6 



Field Description, contents, Meaning 

Reserved for IBH use 

Device address to he monitored 

Limit count - record every nth error 

First sense byte specified 

Sense bit within first sense byte 

Second sense byte specified 

Sense bit within second sense byte 

Summary count for limit detection 

Count of recordings made for this request 

Flag byte 



Bits defined in IRHFLG 
IRHAND EQU X»80» 
IRHOR EQU X'40» 



AND condition specified 
OR condition specified 



IRMSIZE EQD (*-IRHBLOK) /8 IRMELOK size in doublewords (X«02«) 



Section 1 . CP Data Areas and Control Blocks 31 



JPSCBLOK 

I JPSCBLOK; JODRNALING AND PASS WORD S OPPRESSION CONTROL BLOCK 

I The JPSCBLOK is a part of DMKSYS. It is referenced via the EXTERNAL syibcl DHKSYSJR. It 
I is used to control the LOGON/ADTOLOG/LINK Journaling and Password-cn-the-coiiand-line 
I Suppi^ession functions. 






r- 

L_ 






JPSLOGD 






— 1 


8 






JPSLNKD 








10 




JPSPCHN 


1 J*1 1 J*2 1 


J*3 


J*H 




18 


J* 5 


1 J*6 1 J*7 1 


RESERVED 






—J 



Hexadecinal Field 
Displacement Naie 



10 
1U 



15 

16 
17 
18 
19 
1A 
IB 



JPSLOGD 


DS 


CL8 




JPSLNKO 


DS 


CL8 




JPSPCHN 


DS 


IF 




JPSFLAGS 


DS 


IX 


J* 


Bits def: 


Lned 


in JPSFLG 




LOGONJRL 


EQO 


X«80» 




LUTKJRL 


EQU 


X*^t|0» 




LINKJRL1 


EQD 


X»20» 




JRLSQOK 


EQD 


X»10« 




HASKLOG 


EQD 


X»08» 




HASKLINK 


EQD 


X»0tt» 




JPSLOGAR 


DS 


IX 


3*2 


JPSLOGMS 


DS 


IX 


J*3 


JPSLOGDS 


DS 


IX 


J*H 


JPSLNKAR 


DS 


IX 


J*5 


JPSLNKHS 


DS 


IX 


J*6 


JPSLNKDS 


DS 


IX 


J*7 




DS 


XLS 





Field Description, Contents, neaning 

Dserid for LOGOH/ADTCLOG 

threshold messages 
Dserid for LINK threshold 

■essages 
Anchor for PHDIBLOKs 
Control flags 



LOGON/AOTOLCG journaling CB 
Success^ful LINK journaling GN 
Invalid password LINK journaling ON 
SET/QDERY JOURNAL enabled 
Suppress LOGON password 
Suppress LINK password 

LOGOH/ADTOLCG accounting record threshold 

■essages 
LOGON/AOTOLCG message threshold 
LOGON/AOTOLCG disable threshold 
LINK accounting record threshold 
LINK message threshold 
LINK disable threshold 
Reserved for IBH use 
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LOCKBtCK 



LOCKBLOK: USE RID LOCK COHTEOl BLOCK 

LOCKELOK is used to synchronize execution for sections of nonreenterable code. Locked 
users are returned to the CPEXBLCK queue when the function teing executed ccipletes or no 
longer requires nonreenterable resources. LOCKELOKs are queued off DUKSYSLE. 



LOCKNEXT 



LOCKQDE 



LOCKSAME 



icAaucv^jLnau- 



Displacement Nane 



LOCKHEXT DS 
LOCKQDE DS 
LOCKNAHE DS 



1F 
IF 

1D 



Field Description, Contents, Beaning 

Pointer to the next lock control block 
Pointer to CPEXBLOK queue 
The name being locked 



LOCKSIZE EQU (*-LOCKBLOK) /8 LOCKELOK size in doutlewords (X'02») 
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MCHAREA 



HCHABEA: MACHINE CHECK SAVE AREA 



MCHAREA provides CP with statistical data that relates to malfuDCticns of the real 
processor, to its buffers, to processor storage for daaage assessnent, and to the 
recovery of VM/370. 





8 

10 

18 



HCHDAMLN 



I MCHPROCA I 



MCBREC 



MCHCPEX 



I L*1 I//////MCHRESEV////// 



M*1 I M*2 I M*3 I M*M | H*5 | M*6 | H*7 I H*8 



MCHLSDM 



1 

40 1 N*1 

1 _ .„ 


1 N*2 1 N*3 


1 Yt*H 


1 N*5 


1 11*6 1 N*7 


1 11*8 




48 1 
1 


MCHFSAR 




1 


HCEFSA7 






50 1 

L 


MCHFSEAV 




1 


HCBPDAHI 







Hexadeciaal 


Field 






Eisplaceaent 


Naie 









MCHDAMGE 


PS 


OH 





MCHDABLH 


DS 


1H 


2 


MCHPROCA 


DS 


XL2 


4 


HCHREC 


DS 


IF 


8 


MCHCPEX 


DS 


IF 


C 


MCHMODEL 


DS 


IX 




Bits defined 


in MCHM 




MODEL240 


EQD 


XM8» 




MODEL210 


EQU 


X»18« 




MODEL200 


EQO 


XM8« 




MOD3033 


EQD 


X«14« 




MOD3032 


EQD 


XM4' 




MOD3031 


EQO 


XM4« 




MODEL168 


EQD 


XMO' 




MODEL165 


EQD 


X'lO* 




MODEL158 


EQD 


X'OC 




M0DEL155 


EQD 


X'OC 




MODEL 148 


EQO 


X»08« 




MODEL145 


EQD 


X»08» 




M0DEL138 


EQD 


X»04» 




MODEL135 


EQD 


X»04« 




NOMODEL 


EQD 


X«00» 


D 


MCHRESEY 


DS 


3X 


10 


MCHDAMFL 


DS 


0BL8 


10 


MCHFLAGO 


DS 


IX 



L*1 



M*1 



Siis defined in MCHFL AGO 
MCHOHDiR~EQD ~ x"'^80» 
MCHOSFTR EQO X«40» 
MCHODSAD EQD X»20» 
MCH1GERR EQD X»10« 
MCHOTERM EQD X»08» 
MCHOQOIT EQD X»04« 



Field Description, Contents, Meaning 

Daiage assessient area 

Length of damage assessient area 
Processor address 
Machine check record address 
Machine check CPEXBLOK address 
Model nunber for the aachine 



ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
ID number 
No support 



for the 24 

for the 21 

for the 20 

for the 30 

for the 30 



for the 30 



for the 
for the 
for the 
for the 
for the 
for the 
for the 
for the 



16 
16 
15 
15 
14 
14 
13 
13 



for machi 



mach 
mach 
mach 
33 pro 
32 pro 
31 pro 
8 mach 
5 mach 
8 mach 
5 mach 
8 mach 
5 mach 
8 mach 
5 mach 
ne 



ine 

ine 

ine 

cesser 

cesser 

cesser 

ine 

ine 

ine 

ine 

ine 

ine 

ine 

ine 



Reserved for IBM use 
Damage assessment data 
System status 



Hardware recovery 
Software recovery 
Dser abnormally terminated 
Channel inoperative 
Operating system termination 
Quiet mode in effect 
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HCHfiBEA 



Hexadecimal Field 
Displacement Name 



11 



14 



15 



16 
17 



18 
40 
40 
41 



MCHFLAG1 DS 



IX 



Bits defined in HCHFLAG1 
MCHIMSIN EQU X*80* 





MCH1BDFF 


EQD 


X*40» 




BCH1C0ST 


EQD 


X»20» 




MCH1GERR 


EQU 


XM0» 




MCH1PR0C 


EQU 


X'08» 




MCHITODC 


EQD 


X»02» 




MCH1SYSD 


EQU 


X»01' 


12 


MCHFLAG2 


DS 


IX H*3 


13 


MCHFLAG3 


DS 


IX M*4 




Bits defined 





HCH3INTE EQD X»80« 

HCH3S0LD EQD X»40' 

MCH3DATA EQD X*20» 

MCH3PR0T EQD X» 10» 



MCHFLAG4 DS 



IX 



Bits defined in MCHFLAG4 
HCH4T0L0 EQD X»80» 
MCH4REPA EQD X»40' 
MCH4STRE EQD X«20' 
HCH4BDRE EQD XM0« 

HCHFLAG5 DS IX 

Bits defined in MCHFLA65 
MCH5INLG EQD X^80' 
HCH5INMC EQD X»40» 
MCH5IFSA EQD X'20» 



MCHFLAG6 DS 
MCHFLAG7 DS 



IX 
IX 



Bits defined in MCHFLAG7 

MCH7SMCR EQD X»80' 

HCH7YRTH EQD X»40« 

MCH7SYST EQD X«20' 

MCH70PSH EQD X»10» 

MCH77EQR EQD X«08« 

MCH7SDP EQD X»04« 

HCHLSDM DS XL40 

MCHPDAR DS 0BL8 

MCHPDARO DS IX 

MCHPDAR 1 DS 1X 

Bits defined in MCHPD ARl 

MCHPISDE EQD X«80« 

MCHP1IDE EQD X»40« 

MCHP1SKE EQD X»20» 

MCEPIIKE EQD XM0» 



Field Description, Contents, Heaning 
M*2 Damage area 



Kain storage 

Buffer 

Control storage 

Indicates channel is inoperative if bit is on 

Processor 

Time-of-day clock 

System damage 

Damage area (continued) 
Error type 



Intermittent error 
Solid error 
Data error 
Protect error 

H*5 RMS action data 



Time-out loop 

Repair 

Storage reconfiguration 

Buffer reconfiguration 

M*6 RMS information status 



Invalid hardware logout 

Invalid machine check interrupt code 

Invalid failing storage address 

M*7 RMS wait state suffix 
H*8 DMKMCH status 



Second machine check recursion 
Terminate the virtual machine 
Terminate the system 

Machine check old PSH in problem state 
Terminate the virtual=real user 
DMKMCH under the global system lock 

Summary 

N*1 Action taken 
H*2 Failure type 



Solid storage data error 
Intermittent storage data error 
Solid SPF key error 
Intermittent SPF key error 



Machine Check Communication Area Must Be Cleared Above This Line 



Operating system status 
Location of failure 
Location of failure 
Requested operator awareness 
Flag byte 



42 


MCHPDAR2 DS 


IX 


H*3 


43 


MCHPDAR3 DS 


IX 


H*4 


44 


MCHPDAR4 DS 


IX 


N*5 


45 


MCHPDAR5 DS 


IX 


N*6 


46 


MCHPDAR6 DS 


IX 


S*7 
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MCHAREA 



Hexadecimal Field 
Cisplaceotent Name 



Field Description, Contents, Meaning 



liis defined in MCHPDAB6 
MCHP6CBA EQD X*80» 



47 


MCHPDAR7 DS 


IX 




Bits defined 
MCH7STCK EQU 


in MCHPDAR7 
X«80» 




MCH7GSTR EQU 


X»40« 




MCH7PDHG EQD 


X»20« 




MCH7L0G0 EQO 


X»10« 




MCH7EXIT EQD 


X»08» 




MCH7RSRE EQO 


X»04» 




HCH7I0EH EQD 


X«02» 


48 


MCHFSAR DS 


1F 


4C 


MCHFSAV DS 


1F 


50 


MCHFSEAV DS 


IF 


54 


HCHPDARI DS 


1F 



MCHLENI EQD *HCHDAMAGE 
HCHLEN EQD *HCHRESEV 
MCHFIX EQD 280+48 



Change bit active 
N*8 Flag byte 



Interfaces for STACK routine 
Interfaces for GETHAIH routine 
Interfaces for PDRGE routine 
Interfaces for V=R logoff routine 
Interfaces for exit to CP 
Interfaces for RELEASE and RESET routines 
Interfaces for the recorder 

Failing location real address 

Instruction address at failure 

End of the failing location 

End of the failing virtual storage address 

Length of damage assessment area 
Length of area to be cleared 
Length of the fixed logout and the header 
record for machine check handler 
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HCRECCBC 



HCRECOED: MACHINE CHECK HANDLER RECORD 



MCRECORD provides the necessary 
processor and main storage. 



extended logout information for error recording of 



I I!*1 I H*2 I H*3 I M*4 | HcSilTCH | H*5 |/I!*6// 



I 
8 I 

I 
10 I 

I- 
18 I 

I- 
20 ! 

i- 

28 I 

I- 
30 I 



MCDATE 



MCCPDID 



HCPROGir 



MCJOBID 



MCOLDPK 



MCFXDLOG 



I- 

148 I 



MCEXTLOG 
(Variable Length) 



HCHDAMAG 
(80 bytes) 



Hexadecimal Field 
Displacement Name 






nCEEC 


Ds 


OD 







MCRECTYP 


DS 


IX 


M*1 


1 


MCOPSYS 


DS 


IX 


M*2 


2 


HCSBONE 


DS 


IX 


M*3 


3 


MCSHTWO 


DS 


IX 


H*a 


H 


MCSWITCH 


DS 


2X 




6 


HCRECCNT 


DS 


IX 


M*5 


7 


MCRECCC 


DS 


IX 


M*6 


8 


MCDATE 


DS 


XL8 




10 


MCCPDID 


DS 


XL8 




18 


MCPROGID 


DS 


XL8 




20 


MCJOBID 


DS 


XL8 




28 


HCOLDPH 


DS 


XL8 




30 


MCFXDLOG 


DS 


35D 






FXDLGLH 


EQD 


(♦-MCFXDLOG) 


1H8 


MCEXTLOG 


EQU 


* 





MCHDAMAG EQD 



Field Description, Contents, Meaning 



Machine check record type 

Operating system 

Record independent switch 

Record dependent switch 

Unused switches 

Record count 

Reserved for IBM use 

Date and time 

Processor identification and model number 

Program identity 

Job identity (unused) 

Machine check old PSii 

Machine check fixed logout 

Length of machine check fixed logout area 

Beginning of machine check extended logout 
(the extended logout length is variable 
length and machine dependent) 
Damage assessment area (80 bytes) 
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MERREC 



MBRREC: MISCELLANEOUS DATA RECORDING RECORD 



MDRREC retains inforiation for the VM/370 error recording cylinders, 





8 

10 

18 

20 



MDRKEYN | H*1 |/H*2//|/H*3/| H*4 1////HDRSPE1//// 



HDRDTEN 



BDRTHEN 



MDRCPID 



MDRCDAI 



MDRVOL 



MDRSENS 



Bexadecinal Field 



i t) + 1 r n . r r ttI" P Ti ■ 



iii~Mii§ M§§^§i 



6 

8 

C 

10 



18 
1A 

20 



18 
1A 
IB 
1C 

IE 
20 



18 
1A 
22 



MDRKEYN 
MDRSWSI 
MDRSWS2 
MDBSHS3 



DS 
DS 
DS 
DS 



MDRRECNT DS 



1H 
1C 
1C 
1C 
1C 



lils as used in MDRRECNT 
through 3 
a through 7 



MDRSPE1 DS 

HDRDTEN DS 

MDRTMEN DS 

MDRCPID DS 



1H 
IF 

IF 
2F 



IS^ of 24-B2te Header 

Device Dependent Data 
MDRCDA1 DS ~2X 
MDRVOL DS 6X 
MDRSENS DS 24X 



MDHSIZE 


EQD 


(*-MDRREC) 


For 3270 


Reiote 
ORG 


Su££ort 
MDRC0A1 




DS 


2X 




DS 


IX 




DS 


IX 




DS 


2X 




DS 


2X 




DS 


2X 


For 3705 


Remote 
ORG 


Support 
MDRCDAI 




DS 


2X 




DS 


8X 




DS 


2X 



Type and operating systen 
M*1 Switch byte 
M*2 Reserved for IBM use 
M*3 Reserved for IBM use 
M*4 Seguence (4 bits) and record (U bits) 



Osed for seguence nuiber 
Indicates the record total 

Reserved for IBM use 

Date 

Time 

Processor identification and model number 



Primary CDA of device 

Volume serial number of device 

Sense byte data 

MDR record size 



Line address 

Control unit address 

Device address 

Sense and status information 

Resource identification 

Reserved for IBM use 



Device address 

Dserid 

Resource identification 
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HICBLCK 

MICBLOK; VIRTDAL MACHINE POINTER LIST FOR YM/370 HARDWARE ASSI ST 

MICBLOK contains pointers to control registers, the segment table, and other values 
required by the virtual machine assist feature and the VK/370 Extended Control-Program 
Support (ECPS) . This information is needed for the handling of certain instructions and 
privileged operations requested by the virtual machine. The VHHICSC field of the VHBLCK 
points to MICBLOK. 



10 I 



MICRSEG 



MICVPSW 



MICVTMR 



MICCREG 



MICWORK 



MICACF 



Hexadecimal Field 
Displacement Name 






MICRSEG 


DS 


IF 


4 


MICCREG 


DS 


1F 


8 


MICVPSW 


DS 


IF 






ORG 


MICVPSW 


8 


MICVIP 


DS 


IX 




iiis defined 


in MICVIP 



Field Description, Contents, Meaning 

Real segment table pointer 
Virtual control register pointer 
Virtual PSW pointer 



Virtual interrupt pending bit 



Virtual interrupt is pending; therefore, the 
virtual machine assist feature is net to 
handle change of PSW channel masks or 
external mask from disabled to enabled. 
All other bits in this bvte must be 0. 



DS 



3X 



Address of virtual PSW 



C 
10 



14 



MICWORK DS 
MICVTMR DS 



MICACF 



DS 



IF 
IF 



1F 



Workspace pointer 

Location to be decremented when the virtual 

interval timer assist feature of VM/370 

ECPS is being used 
Assist controls 



14 



15 





ORG 


MICACF 


MICEVMA 


DS 


IX 


Bits def 


ined 


in MICEVMA 


MICLPSW 


EQD 


X»80» 


MICPTLB 


EQD 


X«40» 


MICSCSP 


EQU 


X»20» 


MICSIO 


EQD 


XM0« 


MICSTSM 


EQU 


X«08« 


MICSTPT 


EQU 


X«04' 


MICTCH 


EQD 


X»02» 



Expanded virtual machine assist control bits 

LPSW simulation 

PTLE simulation 

SCKC, SPT simulation 

SIO simulation 

STNSM, STOSM, and SSM simulation 

STPT simulation 

TCH simulation 

DS 3X Reserved for IBM Dse 

MICSIZE EQD (*-MICBL0K)/8 Size of ESECT in doublewords (X»03') 
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MIHREC 



MIHREC: HISSIHG INTERBRDPT HANDLER ERROR RECORE 



HIHREC is used in the SVC 76-initiated error recording process of type 70 MIH (Missing 
Interrupt Handler) records. 



10 



18 



20 



28 



30 



r— 


HIHKEYH 1 A*1 


I/A 


*2//|/A*3//|/A' 


"V/I/Z/HIHSPEV/Z/I 




HIHDTES 




1 


HIHTMEU 1 


1 HIHCPIE 1 








BIHJOB 






MIHC0A2 


1 


MIHC0A1 


1 MIHVOL 1 




MIHVOL (cont.) 




1 


HIBDEVT 1 


I— 






MIHIHT 


( 



Eexadeciaal Field 
Eisplaceaent Naae 





2ii-Bite 
MIHKEYN 


Header 







DS 


1H 




2 


MIHSWS1 


DS 


1C 


A*1 


3 


MIHSWS2 


DS 


1C 


A*2 


4 


MIHStJS3 


DS 


1C 


A*3 


5 


MIHRECNT 


DS 


1C 


A*4 


6 


MIHSPE1 


DS 


1H 




8 


MIHDTES 


DS 


1F 




C 


MIHTMEH 


DS 


1F 




10 


MIHCPID 


DS 


2F 





Field Description, Contents, Meaning 



Type and operating systei 

Switch byte 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Date 

Tine 

Processor identification and lodel nuiber 



Deyi cg Dependent Data 



18 


MIHJOB 


DS 


8X 


20 


HIHCDA2 


DS 


3X 


23 


MIHCDA1 


DS 


3X 


26 


MIHVOL 


DS 


6X 


2C 


MIHDEVT 


DS 


4X 


30 


MIHINT 


DS 


8X 



MIHSIZE EQD (*-MIHREC) 



Job whose I/O request is pending 
CUA used to address the device 
Priiary device address 
Voluae serial nuiber of device 
Device type 

Time interval used to check pending 
interrupt 

MIH record size in dcublewcrds (X*07») 
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HKHDB 



MHHDB: YM/370 HONITOB RECOBD HEADER 



MHHDR provides header inforiaticn for following icnitor records. 



HMHRECSZ 



I///BSVD////I H*1 I MHECODE 



I I!*2 I 
1 



8 I 



MNHTOD (cont.) 



Bexadeciial Field 
Eisplaceaent Nane 



aaDaviana cyu 



HNHBECSZ 


DS 


1H 


BSVD 


DS 


1H 


HNHCLASS 


DS 


IX 


MNHCODE 


DS 


XL2 


MNHTOD 


DS 


XLS 


KNHDBLEN 


EQU 


♦-BHHDB 



!!*1 



M*2 



Field Description, Contents, Heaning 

Becord size 
Beserved for IBB use 
Monitor class 
Monitor code 
Current TOE value 

Length of header record 
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MNOOO 

HHOOO: VM/370 MONITOR PERFORM CLASS RECORD 

MHOOO provides an area for the accumlation of records dealing with privilege operations, 
paging, dispatching, and interrupt activity. 








MNOOOWID 




.... , ^ 
1 


8 


HHOOOWPG 1 


10 


MNOOOWIO 1 


18 


MHOOOPRB 1 

1 


20 


MNOOOPSI 




HNOOOCPA 




28 


MNOOOHFL 




MNOOOPSN 




30 


MNOOOPRC 




MNOOORPC 




38 


MNOOOSPC 




MBOOOFLF 




HO 


MNOOOCPT 




MNOOOSS 




H8 


MNOOOPFF 




MNOOOPRF 




50 


MNOOOPCS 




MNOOONXR 




58 


MNOOOCPR 




MN000C7I 




60 


HNOOOCCW 




MNOOOITI 




68 


MNOOOPTI 




MNOOOCKI 




70 


MNOOOCSV 




MHOOOCPG 




78 


MNOOOCIO 




MHOOOCDS 




80 


MNOOOCDA 




MHOOOCDB 




88 


MNOOOCSC 




MNOOEK 




90 


MNOOOIK 




MNOOOMS 




98 


MNOOOLP 




MNOOODI 




AO 


MNOOOSI 




MNOOOSF 




A8 


MNOOOTI 

1 




MNOOOCI 


i 



EC 


r " - ' - - " - 

1 MNOOOHI 


1 BNOOOBD 1 


E8 


BUOOOTC 


1 BNOOOBH f 


CO 


MNOOOMO 


BUOOOLR 1 


C8 


HBOOOCP 


BNOOOCH 1 


DC 


HNOOOTE 


BBOOOCE 1 


D8 


HNOOOCT 


BNOOOPE 1 


EC 


MNOOOPT 


BNOOOEP 1 


E8 


HNOOOIP 


BNOOOFB 1 


FO 


BNOOORR 


BNOOOTCL 1 


F8 


HNOOOLCL 


BHOOOCS 1 


100 


BNOOOCD 


BNOOOBDI 1 


108 


ENOOONDD 


BNOOOHAD 1 


110 


MNOOOPRD 


BNOOOPWR 1 


118 


KNCOONPP 


BNOOOSWS 1 


12C 


MNOOOQIN 


BI1000C2H 1 


128 


MN000Q1E IMN000Q2E 


BNOOOINT IBNOOOPPAI 


13C 


MNOOOPPC 1 ///////// 


BHOOOISD 1 


138 


BNOOOGTB 


BNOOODQB 1 


no 


BNOOOSWF 1 


BSOOOEXT 1 


148 


BNOOONXT 


MNOOOATT 1 
J 


15C 


BNOOOCBT 1 





Bexadeci 


mal 


Field 




Displacement 


Naie 









MNOOOHID DS 


XL8 


8 




MNOOOWPG DS 


XL8 


10 




MNOOOWIO DS 


XL8 


18 




HNOOOPRB DS 


XL8 


20 




MNOOOPSI DS 


IF 


2H 




BNOOOCPA DS 


IF 


28 




MNOOONFL DS 


IF 


2C 




MNOOOPSN DS 


IF 


30 




MNOOOPRC DS 


IF 



Field Description, Contents, Beaning 



Total systei idle wait time 

Total systei page wait time 

Total system I/O wait time 

Total system problem state time 

No. of paging SIOs 

No. of calls to DHKPAG 

No. of page frames currently en free list 

No. of pages currently being swapped 

No. of pages flushed but reclaimed 



42 IBM VM/370 Data Areas and Control Block Logic 



HNOOO 



Hexadecimal 


Field 






risplacement 


Nane 






34 


HNOOORPC 


DS 


IF 


38 


HNOOOSPC 


DS 


IF 


3C 


MNOOOFLF 


DS 


IF 


ao 


MNOOOCPT 


DS 


IF 


44 


MNOOOSS 


DS 


IF 


48 


HNOOOPFF 


DS 


1F 


4C 


BNGOOPRF 


DS 


IF 


50 


MNOOOPCS 


DS 


IF 


54 


MHOOONXR 


DS 


IF 


58 


MNOOOCPR 


DS 


IF 


5C 


MNOOOCYI 


DS 


1F 


60 


MNOOOCCW 


DS 


IF 


64 


MNOOOITI 


DS 


1F 


68 


MNOOOPTI 


DS 


IF 


6C 


MNOOOCKI 


DS 


IF 


70 


MKQQOCS? 


DS 


IF 


74 


MNOOOCPG 


DS 


IF 


78 


MNOOOCIO 


DS 


IF 


7C 


MNOOOCDS 


DS 


IF 


80 


HKOOOCDA 


DS 


IF 


84 


HNOOOCDB 


DS 


IF 


88 


HNOCOCSC 


DS 


IF 


8C 


HNOOOEK 


DS 


IF 


90 


MNOOOIK 


DS 


IF 


94 


MMOOOMS 


DS 


IF 


98 


HHOOOLP 


DS 


IF 


9C 


MNOOODI 


DS 


1F 


AQ 


MNOOOSI 


DS 


IF 


&4 


MNOOOSF 


DS 


IF 


A8 


HNOOOTI 


DS 


1F 


ac 


HHOOOCI 


DS 


IF 


BO 


MNOOOHI 


DS 


IF 


B4 


HNOOOHD 


DS 


IF 


B8 


MNOOOTC 


DS 


IF 


BC 


MNOOOHN 


DS 


1F 


CO 


MNOOOMO 


DS 


IF 


C4 


MNOOOLR 


DS 


IF 


C8 


HNOOOCP 


DS 


IF 


CC 


MNOOOCH 


DS 


IF 


DO 


MKOOOTE 


DS 


IF 


D4 


HNOOOCE 


DS 


IF 


D8 


MNOOOCT 


DS 


IF 


DC 


HNOOOPE 


DS 


IF 


EO 


MNOOOPT 


DS 


IF 


14 


MNOOOEP 


DS 


IF 


E8 


HNOOOIP 


DS 


IF 


EC 


HNOOOPB 


DS 


IF 


FO 


MNOOORR 


DS 


IF 


F4 


MNOOOTCL 


DS 


IF 


F8 


MNOOOLCL 


DS 


IF 


FC 


MNOOOCS 


DS 


IF 


100 


KNOOOCD 


DS 


1F 


104 


MNOOOHDI 


DS 


IF 


108 


mnooohdo 


DS 


IF 


IOC 


MNOOONAD 


DS 


IF 


110 


MNOOOPRD 


DS 


IF 


114 


mnooopwr 


DS 


IF 


118 


MNOOONPP 


DS 


IF 



Field Description, Contents^ Beaning 

No. of reserved pages 

So. of shared systeB pages 

No. of tioes the free list was empty 

No. of calls to DHKPTHFR 

No. of pages stolen from in-gaeue users 

No. of pages swapped from the flush list 

No. of pages examined in stealing a page 

No. of full scans done in stealing pages 

No. of real external interruptions 

No. of calls to DHKPRVLG 

No. cf calls to DHKVIOEX 

NO. cf calls to DHKCCW from DKKVIO 

No. cf interval timer interruptions reflected 

No. cf processor timer interruptions reflected 

NOs cf clock comparator interruptions reflected 

So. cf SVC interruptions reflected 

No. cf program interruptions handled 

No. of I/O interruptions handled 

No. of calls to DMKDSP (main entry) 

NO. of fast reflects in DBSDSF 

No. cf dispatches for new PSWs 

No. cf calls to DBKSCHDL 



Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 
Instruction count for X 



08» 

09« 

80' 

82* 

83 » 

9CX0« 

9CX1» 

9DX0» 

9DX1» 

9EX0» 

9EX1« 

9F» 

AC 



SSK 

ISK 

SSB 

LESW 

DIAG 

SIC 
» SIOF 
» TIC 
» CLEIO 
» HIC 
• HDV 
TCH 
STNSB 



AD' 

B1' 

E202 

E203 

B204 

E206 

E207 

B2C8 

B209 

E20A 

E20E 

B20D 

B213 

E6' 

E7» 

EA» 

EB« 



STOSB 

LBA 

STIDP 

STIDC 

SCK 

SCKC 

STCKC 

SPT 

STPT 

SEKA 

IPK 

PTLB 

RRB 

STCTL 

LCTL 

CS 

CDS 



Diagnose disk I/O simulaticn count 

No. of users dialed to a virtual machine 

No. of users logged on 

No. cf page reads 

No. cf page writes 

No. cf system pageable pages 
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HNOOO 



Hexadecimal Field 
Eisplacement Naie 



lie 


MNOOOSWS 


DS 


ir 


120 


MNOOOQIN 


DS 


IF 


12a 


HN000Q2N 


DS 


IF 


128 


MN000Q1E 


DS 


1H 


12A 


MN000Q2E 


DS 


1H 


12c 


MNOOOINT 


DS 


1H 


12E 


MHOOOPPA 


DS 


1H 


130 


MNOOOPPC 


DS 


1H 


1 132 




DS 


1H 


1 134 


MNOOOISD 


DS 


IF 


1 138 


MNOOOGTM 


DS 


IF 


1 13C 


MNOOODMQ 


DS 


IF 


1 140 


HNOOOSHP 


DS 


IF 


1 144 


HUOOOEXT 


DS 


1F 


1 148 


MNOOONXT 


DS 


IF 


1 14C 


MNOOOATT 


DS 


IF 


1 150 


MHOOOCNT 


DS 


IF 


1 


MNOOOLEN 


EQO 


*-MNOOO 



Field Description, Contents, (leaning 

Sun of working sets of in-gueue users 

No. of users in Ql 

No. of users in Q2 

No. of users eligible for Q^ 

No. of users eligible for Q2 

MONITOR sampling interval (in seconds) 

Pseudo-cylinders* of allocated temporary 

space 
Pseudo-cylinders^ of system temporary space 
Reserved for IBH use 

Count of mini I/O block stack depletes 
Count of mini I/O blocks in the gueue 
Count of mini I/O blocks processed 
Count of SIOs on alternate path 
Count of free storage extensions 
Count of release of free storage extensions 
Count of TRISPLIT attempt 
Count of subpool splits 

Record length in bytes 



'A pseudo-cylinder comprises 100 available page slots for all system-owned volumes. The 
total available pseudo-cylinders per device is determined by the formula: 

(number of cylinders X number of records per cylinder for a device) 

100 
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HK001 



BM001: YB/370 MQNITOB PERIQIM CLASS RECORD 



MN001 gives iDforiBation on the performance of the Attached Processor. 



10 



18 



20 



28 



30 



38 



40 



48 



50 



58 



60 



68 





MH001WIE 




1 

• 


1 MN001WPG 1 


1 HN001WIO 1 


1 HN001PRE 1 


1 MNOOINXR 




HH0C1CSV 


1 


! HH001PRD 




BB0C1PWH 




1 MN001SSY 




HHOOlSSy 




1 MN001SFR 




HH0C1HFB 




1 HNOOISRN 




111SI0C1NR19 




1 HN001STH 




HHCC1NTB 




1 MN001SDP 




BBCCINDP 




! HH001HFI 




BSOOIBPS 




1 MB001HSD 




BS0C1KVD 


J 


1 HN001NRU 









BexaaeciiaJ. 


Fiexd 






Eisplaceient 


Naae 









BN001WID 


DS 




8 


BH001WPG 


DS 




10 


BBOOIilO 


DS 




18 


MH001PB5 


DS 




20 


BNOOINR 


DS 


IF 


24 


BN001CS? 


DS 


IF 


28 


BH001PRD 


DS 


IF 


2C 


BN001PWR 


DS 


IF 


30 


BN001SST 


DS 


IF 


34 


BNOOINSY 


DS 


IF 


38 


BH001SFR 


DS 


1F 


3C 


KNOOIHFR 


DS 


IF 


40 


BN001SRN 


DS 


IF 


44 


BHOOINBN 


DS 


IF 


48 


BH001STB 


DS 


IF 


4C 


BN001NTB 


DS 


IF 


50 


BH001SDP 


DS 


IF 


54 


BNOOINDP 


DS 


IF 


58 


BNOOINFL 


DS 


IF 


5C 


BN001NFS 


DS 


IF 


60 


BN001NSD 


DS 


IF 


64 


BH001NYD 


DS 


IF 


68 


BHOOIHBU 


DS 


IF 




BH001LEN 


EQD 


♦-BS001 



Field Description, Contents, Beaning 

L8 Attached processor idle wait tine 

L8 Attached processor page wait tine 

L8 Attached processor I/O wait time 

LB Attached processor problsss state time 

Bumher of external interrupts tc the attached 

processor 
Hufflfcer of SYCs reflected by the attached 

processor 
Huiher of page reads by attached processor 
Number of page writes by the attached 

processor 
Total time spin on system lock 
Total number of spins for system lock 
Total time spin on DHKFRE lock 
Total number of spins for EBKFBE lock 
Total time spin on RDULIST lock 
Total number of spins for BDBLIST lock 
Total time spin on timer request lock 
Total number of spins for timer request lock 
Total time spin on displacement lock 
Total number of spins for displacement Icck 
Number of times CPFRELK set 
Number of times CPFRESfl set 

Number of times system lock request deferred 
Number of times VBBLCK Icck deferred 
Number of EEKDSPRD entries 

Length of record 
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HN097, MN098 

I UN 097: VM/370 MONITOR HEADER RECORD 

MN097 provides header information for a file that contains data accuiolated by YH/370 
I Monitor. This is the first record of the file. 




8 
10 
18 
20 
28 
30 
38 
40 



r 


MN097CPD 




1 MN097LEV 


1 MN097DAT 


1 MN097TIM 


1 MN097DID 


1 MN097CR8 


1 


MN097SDC 


1 MN097FSS 


1 


MH097DPA 


1 MN097TTS 


1 


MII097VR 


1 MN097CPL 1 MN097APL | 





Hexadeciaal Field 
Displacement Name 




8 
10 
18 
20 
28 
2C 
30 
34 
38 
3C 
HO 
42 



MN097CPD 


DS 


XLS 


MN097LEV 


DS 


CL8 


MN097DAT 


DS 


CL8 


MN 097 TIM 


DS 


CL8 


MN0970ID 


DS 


CL8 


MN097CR8 


DS 


IF 


MN097NUC 


DS 


IF 


MN097FSS 


DS 


IF 


MN097DPA 


DS 


IF 


MN097TTS 


DS 


IF 


MN097VR 


DS 


IF 


MN097CPL 


DS 


1H 


MN097APL 


DS 


1H 


MN097LEN 


EQO 


♦-BN097 



Field Description, Contents, Meaning 

Processor serial nunter and model number 

Program level change 

Current date 

Current time 

Oserid of user who invoked HCBITCH 

Value of control register 8 

Size of nucleus 

Size of free storage 

Size of dynamic paging area 

Size of trace table 

Size of ¥=R area 

Logical address of main processor 

Logical address of alternate pj^ccessor 

Length of header record 



MN098: YM/370 MONITOR TRAILER 51C0RD 

I MN098 contains the userid of the user who has terminated current VM/370 Monitor activity. 
This is the last record of the file. 



MN098UID 



Hexadecimal Field 
Displacement Name 



MN0980ID DS 
MN098LEN EQO 



Field Description, Contents, Meaning 
CL8 ID of user stopping the VH/370 Monitor 

♦-HN098 Length of trailer record 
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HN099, HN10X 



MN099: YM/370 MONITOR SDSPENSIOS SECOBD 



I MN099 contains information recorded when VH/370 Monitor activity is suspended because all 
1 buffers are full and are queued for output. 



I 



MN099TOD 



MN099CIIT 



8 1 H*1 
I 



Eexadeciaal Field 
Cisplacenent Nase 



HK099TOD DS XLS 
MN099CNT DS XLU 

MN099LEN EQO *-HN099 



Field Description, Contents, Meaning 

TOE clock value at suspension 
H*1 Count of suspensions 

Length of the suspension record 



MN10X; VM/370 MONITOR RESPONSE CLASS RECORD 

MNIOX contains information on the number of input or output console line transmissions 
for a given userid. 



! 



8 I MNIOXADD 
I 



MN10XDID 



M*1 I 
I 



MNIOYIO 



Hexadecimal Field 
Displacement Name 




8 


MN10XDID DS 
MNIOXADD DS 


CL8 
1H 




MN10XLEN EQO 


♦-MN10X 


A 


MN10YCNT DS 


IX 




MN10YLEN EQD 


♦-HN10X 


B 


MN10YIO EQO 


* 



Field Description, Contents, Meaning 

Oserid 

Terminal line address 

Short record length 

H*1 Eyte count for the following line 

Long record, header length 

Input/output line starts here 
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HN20X 



MN20X: VM/370 MONITOR SCHEDULER CLASS RECORD 



MH20X contains VM/370 Monitor data on CP's scheduler activity, dispatch queues, paging, 
and spool activity. 



r 

n I 
" I 



MN2GaU1I) 



MN20XNPP 



HN20XSHS 



10 



18 



20 



28 



30 



38 



HO 



48 



MN20XQ1N 



IIN20XQ21I 



MN20XQ1E I MH20XQ2E | MN2CXHSS | H*1 | H*2 



HN20YTTI 



MN20YVTI 



MN204PBI I HN202P6B | HN2C2APB | HH202BEF 



HN202RES | HN202PST | 



HN202IOC 



MH202PNC 



HN2G2LIN 



MN202CRD 



I M*3 I 
J 



Bezadecinal Field 
Eisplaceaent Haie 






fiH20XDID 


DS 


CL8 


8 


HN20XNPP 


DS 


IF 


C 


MN20XSHS 


DS 


IF 


10 


MN20XQ1N 


DS 


IF 


14 


MN20XQ2N 


DS 


IF 


18 


MN20XQ1E 


DS 


1H 


U 


MN20XQ2E 


DS 


1H 


1C 


MH20XiSS 


DS 


1H 


1E 


MN20XQIIM 


DS 


1X M*1 


IF 


HN20XPBC 


DS 


IX H*2 




MN203LEH 


EQU 


*-MN20X 


20 


MN20YTTI 


DS 


XL8 


28 


MN20IVTI 


DS 


XLS 


30 


MN204PRI 


DS 


IF 






ORG 


HH204PRI 


30 


flN202PRI 


DS 


1H 


32 


MN202PGR 


DS 


1H 




HN204LEN 


EQD 


♦-MN20X 


34 


MN202APR 


DS 


1H 


36 


MN202REF 


DS 


1H 


38 


MN202RES 


DS 


1H 


3A 


MN202PST 


DS 


1H 


3C 


MN202IOC 


DS 


IF 


40 


HN202PI1C 


DS 


IF 


44 


HN202LIN 


DS 


IF 


48 


MN202CRD 


DS 


IF 


4C 


MN202LPR 


DS 


IX M*3 




HN202LEN 


EQD 


♦-MN20X 



Field Description, Contents, Meaning 

Dserid being ad4€d and/or dropped f roi queue 

No. of system pageable pages 

No. cf working sets of in-queue users 

No. of users in Q1 

No. cf users in Q2 

No. cf users eligible for CI 

No. cf users eligible for Q2 

User's projected working set size 

Queue wherein additions and/or deletions 

are being made 
CP TBJCE table processor identification 

Length of class 2 code 3 record (Add queue) 

Current VHTTIHE (CP simulation time) 
Current VMVTIHE (user virtual time) 
Eligible list priority 



Dispatch priority 

Pages read while in queue | 

Length of class 2 code 4 record (Drop queue) 



Sum cf pages read that are resid^ent at each 

paging operation 
No. cf pages referenced while in queue 
Current number cf pages resident 
No. cf pages stolen while in queue 
Virtual nonspooled SIO count 
Virtual cards punched 
Virtual lines printed 
Virtual cards read 
Last processor on which execution tcck place 

Length of class 2 code 2 record (add to the 
eligible list) 
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MN400 



MNOOO: YM/370 HONITOR USER CLASS HECOBD 



MN400 provides user virtual machine statistics. 



J _., 


MN4C0niD 




1 


1 MI1400TTI 1 


1 HN400VTI 1 


1 MN400PGB 


1 


HNUCOPGW 




1 MN400I0C 


1 


MUUCOPKC 




1 MN400LIN 


1 


HN4C0CRD 




1 M*1 1 M*2 1 H*3 


1 M*4 1 H*5 


1 M*6 1 H*7 1 M*8 




1 M*9 1 M*10 1 M*11 


f M*12 1 M*13 


|/M*14/| HN400RES 




1 MNUOOWSS 1 HHIOOPDR | MN4C0PDK | MH400I1IT 

1 — — 


-1 



10 



18 



20 



28 



30 



38 



HO 



48 I M*15 I 
I 1 



Hezadeciial Field 
Displacement Name 






MN4000ID 


DS 


CI8 




8 


HH400TTI 


DS 


XL8 




10 


HN400VTI 


DS 


XL8 




18 


MN400PGR 


DS 


IF 




1C 


MN400PGi 


DS 


IF 




20 


MN400IOC 


DS 


IF 




24 


HN400PNC 


DS 


IF 




28 


MH400LIN 


DS 


IF 




2C 


MN400CRD 


DS 


1F 




30 


HN400RST 


DS 


IX 


H*1 


31 


HN400DST 


DS 


IX 


M*2 


32 


MN400OST 


DS 


IX 


M*3 


33 


MN400QST 


DS 


IX 


M*4 


34 


MN400PST 


DS 


IX 


M*5 


35 


MN400EST 


DS 


IX 


H*6 


36 


MN400TST 


DS 


IX 


H*7 


37 


MN400MLV 


DS 


1X 


H*8 


38 


MN400QLV 


DS 


1X 


M*9 


39 


MH400CLY 


DS 


IX 


M*10 


3A 


MN400TLV 


DS 


IX 


M*11 


3B 


MN400PND 


DS 


1X 


M*12 


3C 


MN400UPR 


DS 


IX 


M*13 


3D 


MN4RSV1 


DS 


1X 


M*14 


3E 


MN400RES 


DS 


1H 




40 


MN400WSS 


DS 


1H 




42 


HN400PDR 


DS 


1H 




44 


MN400PDK 


DS 


1H 




46 


MN400INT 


DS 


1H 




48 


MN400LPR 


DS 


IX 


M*15 




HH400LEliI 


EQD 


*-Hir400 





Field Description, Contents, Keaning 

Dserid 

Current VBTTIBE (in VHELCK) ; CP simulation 

time 
Current VHVTIHE (in VHELOK) ; user virtual 

time 
Total page reads for this user 
Total page writes for this user 
Virtual nonspooled SIO count 
Virtual cards punched 
Virtual lines printed 



User running status 

User dispatch status 

User operating status 

User queuing status 

User processing status 

User execution status 

User tracing control status 

User message level 

User queue level 

User command level 

User timer level 

Interrupt pending status 

Directory or SET priority 

Reserved for IBM use 

Number of pages resident 

Estimated working set size 

Drum allocated page frames 

Disk allocated page frames 

Monitor sampling interval (in seconds) 

Last processor on which execution took place 

Length of class 4 code record 
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MK500 



MH500; VM/370 MONITOR INSTRUCTION SIMULATION CLASS RECORD 



MN500 provides data on instructions simulated by CP. 



I 



10 I 



MN500UID 



MN500INS 



MN500VH 



HNSCOVAD 



Hexadecimal Field 
Eisplacenient Name 



C 

8 

C 

10 



MN500UID DS CL8 

MN500INS DS IF 

MN500VAD DS IF 

MN5000VH DS XLS 



Field Description, Contents, Meaning 

Userid 

Privileged instruction 

Virtual storage address of the instruction 

Current total of CP simulation time 



MN500LEN EQU *-MH500 



Length of class 4 code record 
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HH600 



I HH600: VM/lIO HONITOR DAST&P I/O COUHT BE CORE 



I • Header Record 



I MN600HDR header record provides the number of device data packages. 



I MN600NDH | 
I 



Hexadecimal Field 
Displacement Name 



MncnnnnM rtc 



ia\j \j\i a w J 



MN600HLN EQO *-MN600HDR 



Field Description, Contents, Meaning 

Humter of device data packages that 
follow length of header 

Length of header 



I • I/O Count Record 

I HN600DEV input/output count record provides information for each device in the device 
i data packages. 



I MN600ADD | MN600TY | 
I 

8 I I MUeOOCNT 



MN600SER 



Hexadecimal Field 
Displacement Hame 






MN600ADD DS 


1H 


2 


MN600TY DS 


1H 


H 


MN600SER DS 


CL6 


A 


MN600CNT DS 


XLU 




HN600DLN EQD 


♦-MK600DEV 




MN600HAX EQD 


(a096-MNBH 



Field Description, Contents, Heaning 

Device address 

VH/370 device type and/or codes 
Volume serial number of device 
Device accumulated I/O count 

Length of each data record 



(a096-MNBHDLEN-MNHERLEN-Ml}600HLN)/I!K600DLIl 
Maximum device count 
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HN602 



I MH602; VM/370 MONITOR DASTAP DTILIZATIOH RECORD 



I • Header heccrd 



I MH602HDR provides the nuiber of saiples for intervals of device packages. 



i HN602SAM | 
I 



I Bexadeciaal Field 
j Eisplacement Naie 



HN602SAH DS 



1H 



Field Description, Contents, Meaning 
Huaber of samples for interval 



I • Otilizaticn Record 



I HH602 provides, via CP MONITOR coimand, utilization data for DASD and tape devices. 
I There is one record for each device. 



I HN602ADD 
I 

8 I MN602CHQ 
I 



I MN602CHB | HN6C2CUE | Hli602DVB 



I HH602CDQ 



I M*1 I 
1 



I Hexadeciaal Field 
I Displacement Naae 



MN602ADD DS 
MN602CHB DS 
MN602C0B DS 
MN602DVB DS 
MN602CHQ DS 
MN602C0Q DS 
MN602DVQ DS 



1H 
1H 
1H 
1H 
1H 
1H 
1C 



M*1 



Field Description, Contents, Meaning 

Address of the device 

Nunber of tiaes channel is busy 

Number of times control unit is busy 

Number of times device is busy 

Input/output tasks queued en channel 

Input/output tasks queued on the control unit 

Input/output tasks queued en device 



MN602DLN EQU *-MN602DEV Length of device portion in deublewords 
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MH700 

MB700: IM/320 MONITOR SEEKS CLASS BECOBD 

1111700 provides, via CP MOBITOB, the I/O tasks and cylinder seek activity of a specified 
DASD. 







8 

10 


r ■-■ 






HN700DID 1 




1 MN700ABD 


1 MH700CYL 1 


MN7CCCCY 1 M*1 ! H*2 | 




1 M*3 1 


M*4 


1 










1 





— 1 






TT A^r ^ A ^r^A 


n^l 


Tf-iaTA 










UCAClU^V^Jk 


ma-J. 


S i.^±.Q. 










Eispiacement 


Naie 








Field Description- Contents- Meaning 







MH700DID 


DS 


CL8 




Userid 


8 




MN700ADD 


DS 


1H 




Device address 


A 




MN700CYL 


DS 


1H 




Cylinder leing sought 


C 




MH700CCI 


DS 


1H 




Current cylinder 


E 




MN700QD? 


DS 


IX 


H*1 


I/O tasks queued on the device 


F 




MH700QCD 


DS 


IX 


M*2 


I/O tasks queued on the control unit 


10 




MN700QCH 


DS 


IX 


M*3 


I/O tasks queued on the channel 


11 




MN700DIR 
MN700LEII 


DS 
EQD 


IX 

♦-MH700 


11*4 


Seek direction: O0=lower, 01=higher 
Length of class 7 code record 
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MN802 



I MiQ2: YM/370 MONITOR SYSTEM PROFILE CLASS 



I • Header Record 



I MN802HDR provides the number of device block counters. 



i MN802NUH 
I 



MN802CNT 



I Hexadecinal Field 
j Eisplacement Nane 



MN802NUM DS 1H 
that follow 
MN802CNT DS XL4 



MN802DLN EQD 



♦-MN802CTR 



Field Description, Contents, Meaning 
Number of device block counters 
Device I/O count 
Length of the header 



I • System Profile Data 

MN802CTR provides, via CP MONITOR command, additional system profile data. The monitor 
data includes: the I/O activity for each device, the number of logged on users, number of 
page read/writes, and the total system I/O, page wait, and problem state times. 



10 



18 



20 



28 





MN802NA0 


1 


MN8C2PGR 


1 
1 




MN802PGW 


1 


MN8C2NPP 


1 

1 


1 HN802WID 1 


i HN802WPG 1 


1 MN802WIO i 
1 I 


i_ _ 




MN802PRE 




1 
J 



Hexadecimal Field 
Displacement Name 





4 

8 

C 

10 

18 

20 

28 



MN802NAU 


DS 


IF 


No. Of 


MN802PGR 


DS 


IF 


Total s 


MN802PGW 


DS 


IF 


Total s 


MN802NPP 


DS 


IF 


No. of 


MN802HID 


DS 


XL8 


Total s 


HN802WPG 


DS 


XLS 


Total s 


MN802WIO 


DS 


XLS 


Total s 


MN802PRB 


DS 


XLS 


Total s 


MN802CLN 


EQO 


♦-MN802CTH 


Length 



Field Description, Contents, Meaning 



logged on users 
ystem page reads 
ystem page writes 
system pageable pages 
ystem idle wait time 
ystem page wait time 
ystem I/O wait time 
ystem problem time 

of each data entry 
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HNDEVLST 

I MNDEVLST: 111/370 MONITOR CLASS 6 (DASTAP) DEVICE L IST 

I MNDEVLST p^c^ides information on device activity. Pointed to by HCHDVLST^ it (HNDEVLST) 

i contains a list of BBEVBLOK addresses to be nsed by class 6 (DASTAP) data collection, 

i together with bins- for each device, in which the high frequency saipler (DMKENTTI) can 

I accumulate control unit and device busy counts during each monitor interval. Note that 

I channel busy counts are accumulated in a separate area pointed to by MONCHPTB, 5 

I dcublewords and 2 bytes per entry. 



I 



MNRDEVE 



I MNCCESY I HNDVBSY 



! Hexadecimal Field 
i Displacement Name 



MNRDEBV 
MNCDBSY 
MNDVBSY 



DS 
DS 
DS 



1F 

1H 
1H 



Field Description, Contents, Meaning 

Address of RDEVBLOK 
Control unit busy count 
Device busy count 



MNDEVLEN EQO 



*-MNDEVLST 



Device entry size in doublewcrds (X'01') 
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HONCOH 

BOHCOM: VB/370 MONITOB COHMOHICATIOHS AREA 

MOHCOM provides the control link for CP's monitoring activity, the user, and the tape 
drive- 






1 

KONABDB 


""- "' T 

1 H*1 i H*2 i HOHDVHuH | 


8 


BOHDVLST 


I/////////M0HBSV1///////////I 


10 


BOKAIOB 


1 BONATBB 1 

■ 


18 


BONCLOCK 1 


20 


BONSUSCK 1 


28 


BONSUSCT 


I/////////BOHBSVD 1//////////I 

1 


30 




B0NSAVE1 1 



70 I 



B0NSAVE2 



BO 
B8 
CO 
C8 
DO 
D8 
EO 
£8 
FO 
F8 
100 



1 1 

1 BONOSEB 1 

1 ' 


1 BONSPLCT 




BOHSFB 1 


1 BOSCDBV 




BOHHXTV 1 


1 BOHCOBB 




BOBHITB 1 


1 BONDASA 




BOHDASB 1 


i BONDAS 


1 B*3 


1 B*^ 1 BOHBDFHO | 


1 BONCUBBF 




BOSCBSLT 1 


1 BONIOBF 




BONIOSLT 1 


1 BONSKLST 




BOHSACT 1 


1 BONCHPTB 




BONDTRB 1 


1 BOHBOFI 


„ _ „ ,1 






B0NBDF1V 





(Variable number of buffers) 



I (Last address field) 
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MCHCCB 



Hexadecimal 
Displacement 



Fieia 
Name 



DD 



HONARBB DS 
MONFLAGI DS 



IF 



Bits defined in MOMFLAGI 
HONSYSVM EQD X»80» 



CFSTOP 


EQD 


X»20« 


TRON 


EQD 


XMO« 


ERROR 


EQD 


X«08» 


MONTIINT 


EQD 


X'04» 


MONLSTBK 


EQD 


X«02« 


MONIBDF 


EQD 


X»01» 


M0NFLAG2 


DS 


IX 



Bits defined in BQNFLAG2 
SOSPEND EQD x'«'80« 



6 


MONDVHDM 


DS 


1H 


8 


MONDVLST 


DS 


IF 


C 


M0NRSV1 


DS 


IF 


10 


MONAIOB 


DS 


IF 


14 


BONATRB 


DS 


IF 


18 


MONCLOCK 


DS 


1D 


20 


MONSDSCK 


DS 


ID 


28 


MONSOSCT 


DS 


IF 


2C 


MONRSVDI 


DS 


IF 


30 


MONSAVEI 


DS 


16F 


70 


HdNSAVE2 


DS 


16F 


BO 


MONDSER 


DS 


8C 


B8 


HONSPLCT 


DS 


IF 


BC 


HONSFB 


DS 


IF 


CO 


MONCDRV 


DS 


IF 


C4 


MONNXTV 


DS 


IF 


C8 


HONCDRR 


DS 


IF 


CC 


HONNXTR 


DS 


IF 


DO 


MOHDASA 


DS 


1F 


D4 


MONDASB 


DS 


IF 


D8 


HONDAS 


DS 


IF 


DC 


MONEX 


DS 





Bits defined in M0NE3^ 
CLCMD EQD X»80» 

M0NFLAG3 DS 

Bits defined in B0HFIAG3 
CLSDS EQD X'80« 
EXHADST EQD X»aO« 
CL EQD X'20» 
SPOOLED EQD X»10» 



DE 


HONBDFNO 


DS 


1H 


EO 


MONCDRBF 


DS 


IF 


E4 


HONCRSLT 


DS 


IF 


E8 


MONIOBF 


DS 


IF 


EC 


MOBIOSLT 


DS 


IF 


1 FO 


MONSKLST 


DS 


IF 


1 F4 


MONSACT 


DS 


IF 


1 F8 


MONCHPTR 


DS 


IF 


1 FC 


MONDTRB 


DS 


IF 


1 100 


M0NBDF1 


DS 


IF 



Field Description, Contents, Heaning 

Address of monitor tape real device block 
H*1 Monitor flag 



Flag used by user class routine 

MONITOR STOP command has been issued 

Tape rewind-unload CCW has been scheduled 

Tape error has occurred — stop VM/370 monitor 

Handling timer interruption 

Handling the last block 

Only one buffer for 7H/370 monitoring 

M*2 Work byte 



7H/370 monitor has been suspended 

Number of entries in real device list 

Address of the real device list 

Reserved for IBH use 

Address of monitor tape I/O block 

Address of monitor timer reguest block 

TOE clock stamp for each record 

TOD clock value at last suspension 

Suspension count 

Reserved for IBB use 

Monitor internal save area for main processor 

Bonitor internal save area for attached 

processor 
Dser starting/stopping the VB/370 monitor 
Number of records on spool file 
Address of SFBLCK for spool file 
Virtual address of first virtual buffer 
Virtual address of second virtual buffer 
Real address of first virtual buffer 
Real address of second virtual buffer 
Address of next DASD buffer 
Address of previous DASD buffer 
Address of EASD buffer for the spool file 
n*3 Flag byte 



Spool file closed by command 
B*4 Flag byte 



Suspend during close 
Spool DASE slots exhausted 
Suspension necessary 
Bonitor to spool active 

Reserved for IBB use 

Address of current VB/370 monitor buffer 

Corresponding slot address 

Address of VB/370 monitor buffer going to 

tape 
Corresponding slot address 
Address for device list seeks 
Limit count for real time monitor 
Address of channel sampling data 
Address of I/O utilization 
First VB/37C monitor buffer address 
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MONCOH 

Bexadeciial Field 

Displacement Naie Field Description, Contents, leaning 



104 MONB0F1V EQO B0NB0F1*t| First buffer address of reiaining 

variable nuiber of buffers. There 
is one 4-lyte entry for each 
■onitor buffer. The last field 
contains X»FFFFFFFF» 

HONSIZE EQD {*-H0»C0M)/8 Size of DSECT in doutlewords 

Associated Monitor Co ntr ol Fl ags 

Flags in DMKSYSAT 

ADTOGO EQD X»80» SISHOH setting for ADTODISK en 

ADTOSPL EQO X*40» Stop lonitor when spool file 

record liiit is reached 
MOHSLMT EQO X»20» Sampling for real time Monitor 

Monitor Buffer Control Flag in Byte 3 of Buffer 

for Tape and in Bj^te 9 of Buffer for S pool 

MONBDFIO EQO X»00»~ Hot^collecting; being used for 

output 
MONBOFAV EQO X«01« Available for use 

MOHBOFAC EQO X«03» Current active collector 

Monitor Buffer Control Flag in Byte 10 of Spool Buffer 
TRAP EQO X»80» Last buffer gueued for I/O 
DNFIN EQD X»40» Close occurred before the 

buffer was full 

Flaa in Sfool File Control Block (SFBFLAG2) 

SFBHON EQO X'01* ~ Monitor spool file identifier 
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MSSCOH 

I MSSCOM: HSS COMMUNICATIONS CONTROL BLOCK 

MSSCOM contains information necessary to request a MSS volume mount, request a HSS volume 
demount, or complete processing when a pack change interrupt is received on a MSS device. 
The MSSCOM hlccks are chained from location DMKSSSHQ in module DHKSSS. 



10 



18 



20 



MSSSER 



MSSVUA 



////////HSSRSRYD///////// I 



MSSTASK1 



MSSTASK2 



MSSTASK3 



MSSNEXT 



MSSUSEB 



MSSDSER (COnt.) I HSSrLlGS j 
1 



Hexadecimal Field 
Eisplacement Name 






MSSSER 


DS 


CL6 


6 
8 
C 


MSSVUA 

MSSRSRVD 

MSSTASK1 


DS 
DS 
DS 


XL2 

IF 
1F 


10 


MSSTASK2 


DS 


1F 


14 


MSSTASK3 


DS 


IF 


18 
1C 


MSSNEXT 
MSSUSER 


DS 
DS 


1F 
CL8 


24 


MSSFLAGS 


DS 


X12 




Bits defined 
MOUNT iQU 
n-RMfinsT -p.av. 


in MSSFLA 
X»8000' 
Y» ?0Q0» 



MSSERR EQU X'400» 
RQENT EQU X»80» 
MQENT EQU X»40« 



INPROC EQU X»20« 
MSGPROC EQU X«10» 



Field Description, Contents, Meaning 

Volume serial number of the MSS volume 

to te mounted or demounted 
Device address for the volume 
Reserved for IBM use 
Pointer to a CPEXBLOK for a pending 

MSS pack change interrupt 
Pointer to a CPEXBLOK for a pending 

MSC return on mount or demount 
Pointer to a CPEXBLOK for an I/C 

request to a volume teing mounted 
Next entry in the chain, or zero 
Name of the virtual machine that 

requires the MSS activity 
Binary flags representing the 

status of the request 



Mount volume MSSSER on address MSSVUA 

Demount MSSSER from MSSVUA 

The MSC detected an error while 

attempting the requested action 
This request is waiting to be passed 

to the MSC 
This request has been passed to the 

MSC, and is awaiting a pack change 

interrupt 
This request being processed by the MSC 
The MSC has completed for this request 

and message DHKSSS088I is being sent 



MSSSIZE EQU (*-MSSSER)/8 MSSCOM size in doublewords 
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NCPTBL 



HCPTBL: NAMED 370X CONTROL PROGRAM TABLE 



NCPTBL entries provide description information en 370x control progran inages saved en 
CP-owned volunes. 



10 



18 





NCPPNT 


. 


NCPSIZE 


1 
! 
1 


1 NCPNAME 1 
1 • 




NCPVOL 




1 N*1 


|//N*2///| 


1 


NCPSTART 


1 


NCPPAGCT 





Hexadecimal Field 
Displacement Name 





4 

8 

10 

16 



NCPPNT DS IF 

NCPSIZE DS IF 

NCPNAME DS CL8 

NCPVOL DS CL6 

NCPFLAG DS IX 

liis defined in NCPFLAG 

NCPTNCP EQU X»01» 

NCPTCEP EQD X»02« 

NCPTPEP EQD X«03« 



17 


NCPRSV1 DS 


TX 


18 


NCPSTART DS 


IF 


1C 


NCPPAGCT DS 


IF 




NCPSIZE EQD 


(* 



Field Description, Contents, Meaning 

Displacement to next entry 
370x storage size required for load 
Control program reference name 
Volume identification of DASE containing 
saved image 
1*1 CPTYPE flag byte 



Network Control Program 

270x Emulation Control Program 

Partitioned Emulation Program 

N*2 Reserved for IBM use 

Pointer to first page (CCPE) en HCPVCL of 

saved NCP 
Total number of pages saved 



(*-NCPSIZE)/8 NCPTEL size in doublewords (X»04») 
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NICBLOK 

NICBLOK: NETWORK INTERFACE CONTROL BLOCK 

NICBLOK contains control information related to 3704/3705 resources, teleprocessing 
lines, and display screen status information. The RDEVNICL field of RDEVELOK points to 
NICBLOK. 



10 



18 



r— 


NICNAME I NICEPAD 


1 N*1 


1 N*2 1 N*3 1 


1 

N*a 1 




NICRCNT 1 NICVRID 


1 


NICTHAT 






NICUSER 


1 


NICQPNT 




1— 




NICDSP 




., .1 



Hexadecimal Field 
Displacement Name 






NICNAME 


DS 


1H 


2 


NICEPAD 


DS 


1H 


4 


NICSTAT 


DS 


IX 




Bits def 


ined 


in NICS 




NICERLK 


EQU 


X'80« 




NICNTRL 


EQD 


X»40' 




NICDISA 


EQO 


X«20» 




NICSWEP 


EQD 


XM0» 




NICEPMD 


EQU 


X«08« 




NICLTRC 


EQU 


X'02» 




NICDED 


EQU 


X»01« 




NICTRQ 


EQD 


X»80» 




NICHOLD 


EQD 


XM0» 




NICMORE 


EQO 


X«08» 




NICRONN 


EQD 


X»04» 




NICREAD 


EQD 


X»02' 




NICCPNA 


EQD 


X«01' 



Field Description, Contents, Heaning 

370x NCP resource name 
Subchannel address when in EP mode 
N*1 Resource status flags 



Device error lock is set 

Control operation is active 

Resource inactive (offline) 

Resource is switchable to Ep mode 

Resource now in emulator mode 

NCP line trace active 

Resource is dedicated 

Graphic device - timer request pending 

Graphic device - screen full; in HOLD status 

Graphic device - screen full; in MORE status 

Graphic device - screen in running status 

Graphic device - read pending for screen input 

Graphic device - last input not accepted 



NICFLAG DS 



IX 



1*2 Interface control flags 



Bits def 


ined 


in NICFLAG 


NICSESN 


EQD 


X»80» 


NICATTN 


EQD 


X»40« 


NICPSOP 


EQD 


X»20' 


NICATOF 


EQD 


XM0» 


NICENAB 


EQD 


X'08' 


NICDISB 


EQD 


X«02' 


NICMTA 


EQD 


X'OV 


NICFHT 


EQD 


X«80' 


NICDIAG 


EQD 


X»40« 


NICALRM 


EQD 


X»10» 


NICCARD 


EQD 


X'04' 


NICPROCN 


EQD 


X«01' 


NICLLEN 


DS 


IX 


NICTYPE 


DS 


IX 



Bits defined in NICTYPE 
NICCTLR EQD X»00« 
NICLINE EQD X'80« 
NICTERM EQD X'40' 
NICLGRP EQD X»20« 



Session is active for this device 

Attention handling in progress 

Resource has print suppress feature 

Suppress attention signal character 

Resource is active and enabled 

Resource to be disabled as soon as possible 

Multiple terminal access resource 

Graphic device - screen formatted VM/370 online 

Graphic device - screen written with DIAGNOSE 

Graphic device - screen has an alarm message 

Graphic device - data from card reader 

Graphic device - process control task now 

N*3 Terminal output line length 
N*4 Resource type and/or features 



Resource is the 37 Ox 
Resource is a teleprocessing line 
Resource is a terminal device 
Resource is a logical line group 
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NICBLOK 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 



Bits defined in NICTYPE (cont.) 



NICSDLC 


EQU 


X»08' 


NICLBSC 


EQD 


X»04' 


NICSHCH 


EQU 


X«02' 


NICMLTP 


EQU 


X«01» 


NICTELE 


EQU 


X'10' 


NICCIBM 


EQU 


X«08» 


HICRCPD 


EQU 


X»04' 


NICRSPL 


EQU 


X'02» 


NICGRAF 


EQU 


X'OT 


NIC3271 


EQU 


X'08» 


NIC3275 


EQU 


X»Ot»» 



NICOPRDR EQU XMO» 



8 


NICRCNT 


DS 


1H 


A 


NICVRID 


DS 


1H 


C 


NICTMAT 


DS 


IF 


10 


NICUSER 


DS 


1F 


14 


NICQPNT 


DS 


1F 


18 


NICDSP 


DS 


1D 






ORG 


NICDSP 




NICRSV1 


DS 


IX 




NICDTYPE 


DS 


1X 



Bits define in NICDTYPE 
NICD3277 EQU X«04» 
NICD3275 EQU X»02' 



LINE - Synchronous data link control 
LINE - Binary synchronous line control 
LINE - Switched line interface 
LINE - Multiple— drop leased line 
TERH - Telegraph line adapter 
TERM - Selectric-based terminal 
TERM - Bisynch remote computer 
TERM - Bisynch remote spool device 
TERM - Bisynch remote graphics 
Graphic device - 3271 control unit 
Graphic device - 3275 standalone display 

station 
Graphic device - card reader feature 

Retry count for BTU errors 
Virtual resource ID Mhen dedicated 
TOD clock value when attached 
VMBLCK address of associated user 
Pointer to input BTU chain 
Remote 3270 information 



Reserved for IBM use 
Display station type 



3277 display station 
3275 display station 



NICMDL DS 
NICRSV2 DS 
NICRS73 DS 



IX 
1X 
IX 



Display station model 
Reserved for IBM use 
Reserved for IBB use 



NICSIZE EQU {*-NICBL0K)/8 Size of block in doublewords (X»03') 



Device Dependent Data - 3270 on Binar_y Sy n chronous Line s 

ORG NICEPAD 
NICCORD DS IX Current line coordinates 

NICTMCD DS IX Terminal mode 



Bits defined in NICTMCD 
NICTABF EQU X»80» 
NICSIO EQU X»40» 
NICAPL EQU X»20» 
NICTEXT EQU X»10» 



Second scan of screen's input area 
DIAGNOSE issued to input area 
APL en for 3270 remote 
Text feature on for 3270 remote 



ORG NICRCNT 
NICSELT DS le 
NICPOLL DS 1H 
NICATRB DS IF 



Remote station selection characters 
Remote station polling characters 
Timer request block address 



layate Symbols for VH/370 Su£Eort of the 370x 
WRITBRK EQU X»09» Write break CCW operation code 

RDBUFLN EQU 96 Length of host read buffers 

RDBUFNO EQU 6 Number of host read buffers 

S ense Bits (sense byte 0) Peculiar to the 370x 

IPLREQ EQU X»02» IPL required — 3705 inactive 

ABORT EQU X»01» Buffer depletion — transfer terminated 
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NPBTEL 



J NPRTEL: MRM 3800 IMAGE LIBBftBl TABLE 



KPRTEL lists by naae all pages saved and indicates the DASD volnne that contains the 
saved iaage. 



10 



18 



« 


NPRPNT 


1 


SPSRSV1 




1 


1 UPBNAHE 1 






NPEVOL 


1 N*1 


H*2 


1 

1 
1 




NPHSTART 


1 


NPRPAGCT 




1 

1 
- .1 



Hexadeciial Field 
Displacement Naae 






NPRPNT 


DS 


IF 




4 


NPRRSVI 


DS 


IF 




8 


NPRNAHE 


DS 


CL8 




10 


NPRVOL 


DS 


CL6 




16 


NPRCNT 


DS 


IX 


N*1 


17 


NPRRS72 


DS 


IX 


N*2 


18 


NPHSTART 


DS 


IF 




1C 


NPRPAGCT 


DS 


IF 





Field Description, Contents, Keaning 

Chain pointer to next entry 
Reserved for IBH use 
Reference name for image library 
Volume of DASD containing the 

saved image 
Number of 3800s active on this image 
Reserved for IBH use 
CCPE of first page on KPBVCL 
Number of pages saved 
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OERRECN (Long OBR) 

OEHRJCN: ON IT CHECK EBROR RECORD (LONG OUT BO J RE R ECO RE) 

OBRRECN provides error, sense, and other statistical data needed for error recording on a 
specified channel-attached I/O device. 






OBBKEYN 


! OBR SWSN ! /////// ///QBE SPE 1/ ///////// ! 

1 


8 


OBRDTEN 


1 


OERTMEK 1 
1 


10 


■ ■ "' '" ■■" '"■ ■ ■- ■■ , , . . , 

OBRCPIDN 1 


18 


OBRFGHN 1 


20 


OERECCWN 1 


28 


OERCSWN 1 

1 


30 


S*1 1 


OBRCDAIN 


1 


1 

OEREEVTK | 

I 


38 


S*2 1 


OBRCDAPR 


1 OERIORTY 1 CBRSNSCT | 

I 


40 




Device 


Dependent 


Eata 1 



Hexadeciial Field 
Displaceient Nane 



Field Description, Contents, Beaning 



24-Eyte Header Re cord 



OBRKEYN DS 
OBRSWSN DS 



1H 
1H 



Record type 
Switches 



Bits defined in OBRSWSN 
Byte ~ ~ 

OBRMORE EQD X»80» 
OBRTOD EQO X»40» 



Hore records to follow 

TOD clock instruction issued 





Bits defined 


in OBRSWSN 




Byte 1 






OBREOD EQO 


X'80' 




OBRTEMP EQO 


X»40» 




OBRSHOBR EQD 


X«20» 




OBRDEMNT EQU 


X»04» 


n 


0BRSPE1 DS 


IF 


8 


OBRDTEN DS 


1F 


C 


OBRTHEN DS 


IF 


10 


OBRCPIDN DS 


2F 



SDR counters duiped at BCD 
Tenporary error 
Short record 
Voluie demounted 

Reserved for IBH use 

Date 

Time 

Processor identifier and serial number 



18 
20 
28 
30 
31 



OBRHSIZE EQU (*-CBRRECN) 

End of 2ii-Byte Header Record 



OBRPGMN DS 
OBRFCCWN DS 
OBRCSWN DS 
OBRDDCNT DS 
OBRCDAIN DS 



2F 
2F 
2F 
IX 
3C 



S*1 



Si2e of OER header 



Job identification 

Failing CCU 

Failing CSW 

Number of doublewords in record 

Address of failing device 
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CEBBECN (Long OEB) 



Eexadeciial Field 
Cisplacement Name 



40 
48 

sn 



58 
62 



58 



Field Description, Contents, Meaning 

Device type 
S*2 Hufflter of SIR work area bytes 
Primary unit address 
Numter of retries 
Number of sense bytes 

0BR1SIZE EQD (*-OBEEECN) Size of long OEB record base 

Format of Device Dependent Data 



34 


0BRDE7TN DS 


1F 


38 


OBRSDRCT DS 


1X 


39 


OBRCDAPR DS 


3C 


3C 


OBRIORTY DS 


2X 


3E 


OBRSNSCT DS 


2X 



40 
4A 



bll 5d§2 Units 
obrvoln" DS~ 8C 

OBRLSKN DS 8X 
OBHHAN DS 8X 

23^4/2319 Format 
OBRSDRBK DS 10X 
OBRSENSN DS 6C 

0BR2SIZE EQU (*-OBRRECN) 

3350/3340/3330/2305 Format 

ORG OBRSDRWK 
OBR33SHS DS 24C 

0BR3SIZE EQD (*-OBRRECN) 

Ssii lecord Format 

ORG OBRVOIN 
OBRDRST DS 10X 
OBRORSNS DS 1C 



Volume identification 
Last seek address 
Home address 



SDR work area 
Sense data 

Maximum size of 2314/2319 record 



3350/3340/3330/2305 sense data 
Maximum size of 3330/3340/2305 record 



SDR work area 

Dnit record sense data 



40 



40 
41 
48 
52 



40 
41 
48 
52 



48 
52 



48 
58 
6C 



3505/3525 Format 


ORG 


OBRVOLN 


OBR3505S DS 


1C 


3203 Format 

ORG 


OBRVOLN 


OBRCORRL DS 


1X 


DS 


7X 


0BRSDR03 DS 


10X 


OBR3203S DS 


24C 


3211 Format 
ORG 


OBRVOLN 


OBRCORL DS 


IX 


DS 


7X 


OBRSDR32 DS 


10X 


OBR3211S DS 


6C 



2400 Tape Format 

ORG OBRLSKN 
OBRTAPST DS lOX 
OBRTiPSN DS 24C 

3420/34J0 Tape Format 

ORG OBRLSKN 
OBRDVDEP DS 16C 
0BR342ST DS 20X 
OBR3420S DS 24C 



3505/3525 sense data 



Correlation number 
Reserved for iBo use 
SDR work area 
3203 sense data 



Correlation number 
Reserved for IBM use 
SDB work area 
3211 sense data 



SDB work area 
Tape sense data 



Device dependent data 
SDB work area 
3420 sense data 
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OEBREC (Short OBR) 

ERR EC: ON IT CHECK ERROR RECORD (SHORT ODTEOflRE BICORE) 

OERRECN provides error, sense, and other statistical data needed for error recording on a 
specified channel-attached I/O device. 



18 i 



UBHJJJSVSH 



I 0*1 I 



OBRCOA 



20 



OBRSDRIN 



30 



Hexadecimal Field 
Displacement Name 



I //////////OBR S V 1 /////////// 1 



Field Description, Contents, Meaning 



24-Byte Header Record 



Note: The 24-byte Header Record for the Short OER is identical to 

that of the Long CER, the description of which precedes this block. 



18 
1C 



OBRDEVSH DS 

OBRSDRSH DS 

OBRSIZE EQU 

OBRSIZEl E<20 



ID 


OBRCDA 


DS 


3X 


20 


OBRSDRIN 


DS 


20X 






ORG 


OBRSDRIN 


20 


OBRSSDRI 


DS 


10X 


2A 


0BRSSDR2 


DS 


10X 


34 


0BRSV1 


DS 


IF 




0BRSIZE2 


EQD 


(*-OERRE 



IF Device type 

IX 0*1 Numter of SIR work area tytes 

(*-OBRRECN) Size of short OBR record base 

(♦-OBRHECS+T) /8 Sixe in doutiewords (X'04») 



Channel and unit address 
SDH work area 



SDH work area 
SDR work area 

Reserved for IBH use 



(*-OERRECN+7)/8 Size in dcutlewords (X»07») 
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CBHDLIST, PAGTAELE 



OiNDLIST: CF-OWNED ¥OLDHES LIST 



OWNDLIST contains a list of all the system owned DASr voluiDes that are used for paging, 
spooling, and teaporary disk storage activity. lach entry specifies the vclume identity 
and its preferred use (that is, paging/spooling/T-disk space) . This block is generated 
by the SYSOiN nacro at system generation. 



I 



OWHDVSER 



CiNDEDEV I 
i 



Eexadecimal Field 
Displacement Name 




6 


OWHDVSER DS 
0WNDRDE7 DS 


CL6 
1H 


6 


ORG 
OHNDPREF DS 


OWNDRDEV 
1H 



Field Description, Contents, Heaning 

vOxuiae scjLj.aj. umohj-cJ. 

Displacement of RDEVELOK fcr the volume 



Allocation preference 



PAGTABLE; TRANSLATION PAGE TABLE 

PAGTABLE is used by CP for allocating and referencing storage. It is referenced by the 
segment table (SEGTABLE) data area and contains a pointer to the swap table (SWPTAELE) 
which, in turn, is related to a DASD cylinder location. The SWPPAG field of SWFTAELF 
points to PAGTABLE. 



-8 I 
i- 

i 



PAGSTHP 



PAGACT 



PAGTOT 



PA6SHR 



PA6SWP 



8 I PAGCORE 
I 



Hexadecimal Field 
Displacement Name 



-8 


8-Byte Header 
PAGSTMP DS 


IF 


-U 


PAGACT DS 


1H 


-2 


PAGTOT DS 


IB 





PAGSHR DS 


IF 


ti 


PAGSiP DS 


1F 



Field Description, Contents, Keaning 



Page table time stamp 

Count of active segment table entries 

for this segment 
Count of total segment table entries 

for this segment 
Pointer to BAHE table (SBETAELE) 
Pointer to swap table (SiPTAELE) 



Section 1. CP Data Areas and Control Blocks 67 



PAGTABLE, PGBLOK 



Bexadecinal 
Displaceient 



Field 
Naie 



PAGCORE DS 



1H 



Siis defined in PAGCORE+J 
PAGINVAL EQU X»08» 
PAGREF EQU X'01' 



Field Description, Contents, Meaning 

Real page address (start of page table for 
hardware) 



PAGTJELE entry invalid 
Page has teen referenced 



ISSates Used in Attached Processor Support for Shared Segments 
PAGTSWP EQU (PAGC0RE-PAGSTHP«-16*L«PAGCCBE) 

length of a full 16 entry page table 
PAGBMP EQU (PAGISWP+ {SBPFLAG-SWPVH)+16* 

(SWPC0EE-SHPFLAG»1)«-8) length of 
a contiguous page and swap table 



PGBLOK; PSEDBO PAGE FAULT STACK BLOCK 

PGBLOK is used by VH/VS Handshaking. The block is created and stacked when a 
lultiprogranning or Multitasking VS1 program interrupt occurs when a referenced page is 
not available in storage. The VHPGPHT field in the VHBLOK points to PGEtCK. 



I PGPMT 

L - 



PGADDR 



Bexadeciial Field 
Displacement Name 



PGPNT 
PGADDR 



DS 
DS 



IF 
IF 



Field Description, Contents, Heaning 

Pointer to next page block en the stack 
Virtual page fault address 



PGBSIZE EQU (*-PGBL0K+7)/8 PGBLOK size in doublewords (X»01M 
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PSA 

iSA: PREFIX STORAGE AREA (LOW STORAGE LOCATIONS) 

PSA is the primary control block for controlling CP and virtual machine activity. This 
control block contains the normal low core IPL, logout, and PSW information; the 
processor model and type and features of the processor; and save areas used by EALR and 
FREE. This block also contains monitor and trace data and the necessary linkages to 
virtual machines, real devices, and spool files. 

Note: All fields reside in real PSA unless otherwise specified. Fields residing in 
absolute PSA are specifically identified. For uniprocessor operation, real PSA equals 
absolute PSA (or 0) . If the system was running in AE mode when a catastrophic error 
occurred, the Attached Processor will no longer be running. System recovery is in 
uniprocessor mode and the real PSA will no longer be zero. 





Page 


, Machine Usage 





IPLPSi 


! IPLCCH1 1 


10 


t IPLCCH2 


i EXOPSW 1 


20 


SVCOPSH 


i PROPSW i 


30 


1 MCOPSB 


1 lOOPSW 1 


UO 


CSi 


1 CAW IQDANTDMRI 

■ 


50 


|. . '■-■■' --- ■ ■■ 1 
1 TIMER IQOANTOM | EXNPSW | 

1 


60 


SVCNPSW 


1 PRNPSW I 


70 


MCNPSH 


1 lONPSW 1 


80 


CPULOG 1 


100 


FXDLOG 1 


160 


FPRLOG 1 


180 


6PRL0G 1 


ICO 


CRLOG 1 


200 


TEBPSAVE 1 


2*10 


BALRSAVE | 


280 


FREESAVE | 


2C0 


FREEWORK j 

1 


2F0 


DATE 


1 TODATE 1 


300 


STARTIME 


1 CPDID 1 


310 


IDLEiAIT 


1 PAGEWAIT 1 


320 


lONTWAIT 


1 PROBTIHE 1 


330 


RDNPSU 


IRONDSER IDSPLPSW 1 


3ao 


RUNCRO IRDNCR1 


ICPSTAT ICPRESTRTJ 

1 


350 


PGREAD IPGSRITE | PGWAITIM \ 


360 


"■■' i 

////PGWAITPG///////IPSASVCCT |P*1 |P*2| 

L J 



a3C 
nnc 

mc 

4FC 
50C 

540 

58C 



ARSPPR lARSPPD | AESFRE | ARICPD 



ARIOPE lARIORD | E*5 | P*6 | ARSPAC 



AVHREAL lASYSABBD | ASYSLC | ASYSOP 



ARIOCI lARIOCH | ARICCD 



37C(CPIB 

380 

39C 

3AC 

3EC 

3CC 

3DC 

3FC 

3FC 

acc 



ICPABEND IE*3 | E*«» j ASYSVM 



I ARICEV 



ARIOCC lARIODC | AEICDC | ACORETEL 



APAGCE ICPCREGO | CECEEG6 | CPCRE68 



TIHEDISP lASVCLIST | AVHALIST |LASTOSFE 



PAGECDR IMOHNEXT | PAGEBE | PAGEHXT 



TRACEFLG |TTSEGCNT I ////////////////// 
' ////////////////// 



/////////////////PSAESV15///////////// 



INSTWED1 IINSTWRD2 |IHSTWBE3 |INSTWRE4 



Constants Pool 



APTRLK 



NOADE 



IX4CFFS IXRIGHT24 



XPA6NDM IXRIGHT16 j AFEEE 



AFRET 



AQCNWT lADSPCH |AETEAN |X20'48ENE 



DOHPSAVE 



SIGSAVE 



LCKSAVE 
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PSA 



5C0I 

I 

6001 

640 
650 
660 
670 
680 
690 
6fi0 



MFASAVE 



SWTHSAVE 



LOCKSAV 



SVCREGS 



I 6EC 
6CC 

I I 6EC 

I 

6EG 

6FC 
7CC 
71C 



PREFIXA I PREFIXBI PSACPXBE I//BESVD// 



WAITSTRT 



WAITEND 



PWTPAGESIACTIVTRQI EMSPEND | EMSREC 



XCPEND |P*7|P*8 |P*9| 



APSTATDS 



AMCHAREAISHRLKCNTI 



PROESTRT 



CHGREGS 



I /////RESERVED///// 



OHSHRVH I P*10 I P*1 1 1 /////RESERVED///// 



STACKVH inHSHRV!!2 | AEKKCEE | RESERVED/ 



///////////BESERVED (cent) //////////// 



75C| 



ALOKDM I RESERVE ( ALCKSF | AEXTSP 



ATHRSN I//////////RESERVED////////// 



HCNREGS 



LCKSAVE2 



Bexadecinal Field 
Displacement Naie 



Field Description, Contents, Beaning 



8 
10 



8 
C 

10 

14 



18 
20 
28 
30 
38 

no 

48 
4C 
50 
54 
58 
60 
68 
70 
78 



Machine 


[J sage 




IPLPSW 


DS 


ID 




ORG 


IPLPSW 


RSRTNPSW 


DS 


1D 


RSRTOPSH 


DS 


ID 


IPLCCW1 


DS 


ID 


IPLCCII2 


DS 


ID 




ORG 


IPLCCW1 


PSARSV3 


DS 


IF 


TRACSTRT 


DS 


1F 


TRACEND 


DS 


IF 


TRACCDRR 


DS 


IF 


EXOPSW 


DS 


1D 


SVCOPSW 


DS 


ID 


PROPSW 


DS 


ID 


MCOPSW 


DS 


1D 


lOOPSW 


DS 


ID 


CSW 


DS 


ID 


CAW 


DS 


IF 


QOANTDMR 


DS 


IF 


TIBER 


DS 


IF 


QDANTDH 


DS 


IF 


EXNPSH 


DS 


ID 


SVCNPSH 


DS 


ID 


PRHPSW 


DS 


ID 


MCNPSW 


DS 


ID 


lONPSW 


DS 


ID 



IPL start PSW 



Restart new PSW 
Restart old PSW 



IPL CCW 
IPL CCW 



Reserved for IBB use 

Address of start of trace table. 

Note that TRACSTRT is in absolute PSA 
Address of end of trace table. 

Note that TRACEND is in absolute PSA 
Address of next available trace table entry, 

Note that TRACCDRR is in absolute PSA 

External old PSW 

SVC old PSW 

Program old PSW 

Machine check old PSW 

I/O eld PSW 

Channel status word 

Channel address word 

Interval timer value at last interrupt 

13-microseccnd interval timer 

Interval timer value at last dispatch 

External new PSW 

SVC new PSW 

Program new PSW 

Machine check new PSW 

I/O new PSW 
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psa 



Hexadecimal 


Field 






Eisplacement 


Name 






80 


CPDLOG 


DS 


16D 






ORG 


CPDLOG 


80 




DS 


IF 


84 


INTEXF 


DS 


IF 




Bits def: 


ined 


in INTEXF 


86 


INTEX 


~EQO 


INTEXF+ 


88 


INTSVCL 


DS 


1H 


8A 


INTSVC 


DS 


1H 


8C 


INTPRL 


DS 


1H 


8E 


INTPR 


DS 


1H 


90 


TREXADD 


DS 


IF 


94 


MONCLASS 


DS 


1H 


96 


PERCODE 


DS 


1H 


98 


PERADD 


DS 


1F 


9C 


MONCODE 


DS 


IF 


AO 




DS 


1D 


A8 


CHANID 


DS 


IF 


AC 


lOELPNTR 


DS 


1F 


BO 


ECSHLOG 


DS 


1F 


B4 




DS 


IF 


B8 


INTKFLIN 


DS 


1F 



EA 



Bits defined in INTKFLIN 
INTTIO EQU INTKFLIN+2 



EC 




DS 


11F 


E8 


INTMC 


DS 


1D 


FO 




DS 


IF 


F4 


INTRC 


DS 


IX 


F5 




DS 


3X 


F8 


FAILSTAD 


DS 


IF 


FC 


REGNCODE 


DS 


IF 


100 


FXDLOG 


DS 


12D 


160 


FPRLOG 


DS 


4D 


180 


GRLOG 


DS 


16F 


ICO 


CRLOG 


DS 


16F 


200 


CPDSAGE 


DS 


OH 






ORG 


CPDSAGE 


200 


TEMPSAVE 


DS 


16F 






ORG 


TEBPSAVE 


200 


TEHPRO 


DS 


IF 


204 


TEHPR1 


DS 


IF 


208 


TEMPR2 


DS 


IF 


20C 


TEMPR3 


DS 


IF 


210 


TEMPR4 


DS 


IF 


214 


TEMPR5 


DS 


IF 


218 


TEMPR6 


DS 


IF 


21C 


TEMPR7 


DS 


IF 


220 


TEMPH8 


DS 


IF 


224 


TEMPR9 


DS 


IF 


228 


TEHPR10 


DS 


IF 


22C 


TEHPR11 


DS 


IF 


230 


TEHPR12 


DS 


IF 


234 


TEMPR13 


DS 


IF 


238 


TEHPR14 


DS 


IF 


23C 


TEHPR15 


DS 


IF 



Field Description, Contents, Meaning 
Processor and storage logout area 



Reserired for IBM use 

External interrupt code (fullword) 



External interrupt code (halfword) 

SVC instruction length code (ILC) 
SVC interrupt code 

Program instruction length code (ILC) 
Program interrupt code 
Translation exception address 
Monitor class 
PER code to be reflected 

Address of instruction causing PER interrupt 
Monitor code 
Reserved for IBM use 
Channel IE 

I/O extended logout (lOEL) pointer 
Limited channel logout (ECSH) 
Reserved for IBM use 

I/O interrupt key, flags, and interface 
address 



I/O interrupt device address (halfword) 

Reserved for IBM use 
Machine check interrupt code 
Reserved for IBM use 
External damage reason code 
DgggT;TTQr[ for IBM use 
Failing storage address 
Region code 

Fixed logout area 

Floating-point register logout area 

General register lo'^out area 

Control register logout area 

End of machine usage; start of CP usage 



Temporary save area 



Registers 0-15 
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PSA 



Hexadecimal Field 
Eisplacement Nase 



240 



240 
244 
248 
24C 
250 
254 
258 
25C 
260 
264 
268 
26C 
27 
274 
278 
27C 

280 



280 
284 
288 
28C 
290 
294 
298 
29C 
2A0 
2A4 
2A8 
2AC 
2B0 
2B4 
2E8 
2BC 

2C0 
2F0 
2F8 
300 
308 



308 
309 
30C 

30E 

310 
318 
320 
328 
330 
338 
33C 
340 
344 



BALRSAVE DS 



BALRO 

BALRl 

BALE 2 

BALR3 

BALR4 

BALR5 

BALR6 

BALR7 

BALR8 

BALR9 

BALRIO 

BALR11 

BALR12 

BALR13 

BALR14 

BALR15 



FREERO 
FREER 1 
FREER2 
FREER3 
FREER4 
FREER5 
FREER6 
FHBER7 
FREER8 
FREER9 
FREERIO 
FREER 11 
FREER 12 
FREER 13 
FREER 14 
FREER 15 

FREEiORK 

DATE 

TODATE 

STARTIME 

CPOID 



CPOVERSN 
CPUSER 
CPDKODEL 
CPDMCELL 

IDLEUAIT 

PAGEHAIT 

lONTiAIT 

PROBTIME 

RDNPSW 

RDNDSER 

DSPLPSW 

RDNCRO 

RONCRI 



ORG 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 



FREESAVE DS 



ORG 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 

DS 
DS 
DS 
DS 
DS 

ORG 

DS 

DS 

DS 

DS 

DC 
DC 
DC 
DC 
DS 
DS 
DS 
DS 
DS 



16F 

BALRSAVE 

IF 

IF 

1F 

IF 

IF 

IF 

IF 

1F 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

16F 

FREESAVE 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

IF 

12F 

CL8 

ID 

ID 

ID 

CPOID 

IX 

3X 

2X 

1H 



Field Description, Contents, Beaning 
EALR linkage save area 

Registers 0-15 



EMKFRE save area 



Registers 0-15 



EHKFEI work area 

Date - aiiB/dd/yy - edited EBCDIC 

TOD clock at hh.mn.ss today - local time 

Date and time started - TOE clock value 

Processor identification field 



Version code 

Processor serial numter - packed unsigned 

Processor model number 

Haximum length in tytes of HCEL 



X»7FFFFFFFFFFFFC00» Tot 
X»7FFFFFFFFFFFFC00« Tot 
X»7FFFFFFFFFFFFC00» Tot 
X»7FFFFFFFrFFFFC00» Tot 
ID PSW last 

IF Address 

IF Load PSW 

IF Control 

IF Control 



al system idle wait time 
al system page wait time 
al system I/O wait time 
al system problem state time 

loaded by dispatcher 
of dispatched VBELCK 

instruction used to dispatch 
register at dispatch 
register 1 at dispatch 
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PSA 



Hexadecimal 
Displaceaent 



Field 
Naie 



348 



348 



349 



34A 



34B 



CPSTAT 



DS 



IF 





ORG 


CPSTAT 


CPSTATOS 


DS 


IX 


Bits def: 
CPWAIT 


ined 
'equ 


in CPSTATUS 
X»80» 


CPBDIJ 


EQD 


X»40' 


CPEX 


EQD 


X»20' 


CPFVRON 


EQD 


X»10» 


CPSDPER 


EQU 


X»08« 



XTNDLOCK DC 



IX 



CPSTAT2 DC 1X 

Bits defined in CPSTAT2 
CPMICAVl EQO X»80» 
CPHICON EQO X»40» 
CPSHRLK EQD X»20» 
CPASTAVL EQD X»08« 
CPASTON EQD X»04» 

CPSTAT3 DS IX 

iiis defined in CPSTAT3 
CPTIDLE EQD X»80« 





CPTPAGE 


EQD 


X'40» 




CPTIONT 


EQD 


X'20' 


34C 


CPRESTRT 


DS 


1F 


350 


PGREAD 


DS 


IF 


354 


PGWRITE 


DS 


IF 


358 


PGWAITIB 


DS 


ID 


360 


PGWAITPG 


DS 


ID 


368 


PSASVCCT 


DS 


IF 


36C 


PAGELOAD 


DS 


1H P*1 


36E 


PAGERATE 


DS 


1H P*2 


370 


PSENDCLR 


DS 


OF 


370 


CPID 


DS 


1F 


374 


CPABEND 


DS 


1F 


378 


PSTARTSV 


DS 


OF 


378 


SYSIPLDV 


DS 


1H P*3 


37A 


PGSRATIO 


DC 


H'0» P*4 


37C 


ASYSVM 


DC 


V(DHKSYSVM) 


380 


ARSPPR 


DC 


V{DHKRSPPR) 


384 


ARSPPD 


DC 


V(D!5KRSPPD) 


388 


ARSPRD 


DC 


V(DHKRSPRD) 


38C 


ARIOPD 


DC 


V(DMKRIOPD) 


390 


ARIOPR 


DC 


Y(DMKRIOPR) 


394 


ARIORD 


DC 


V(DBKRICRD) 


398 


IPOADDR 


DS 


1H P*5 


39A 


PSAMSS 


DS 


1H P*6 



Bits defined in PSAMSS 
HSSPRES EQD X»80« 



Field Description, Contents, Meaning 
CP rnnning status 

CP ronning status 



CP in wait state 

CP running user in RDHDSER 

CP executing stacked request 

Reserved for IBH use 

Processor is executing in supervisor state 

System extending free storage if it is 
oanai to I'FF*. Kote that XTSDLOCK is ii 
absolute PSA. 

Flag tyte 



Virtual machine assist available on processor 
Virtual machine assist is en for system 
CP processing shared named system page 
CP assist available en processor 
CP assist is on for system 

Wait time accounting flag 



Timer contains idle time 
Timer contains page wait time 
Timer contains I/O wait time 

Restart address if external interrupt marks 

page invalid 
Total number of page reads 
Total number of page writes 
Time spent in page wait, multiplied by number 

of pages waiting 
Reserved for IBH use 
Total number of user SVCs 
Page wait percent, last measurement 
Paging rate, pages per second 

Note that PAGERATE is in absolute PSA. 
End of area cleared by DHKCPIHT 
CP running identifier, Sote that CPID is 

in absolute PSA. 
CP abend code 

Start of save/restored code 
Device address of system lEL device 
Page steals/total replenished 
Address of system VHELCK 
Address of system printer file chain. 
Address of system punch file chain. 
Address of system reader file chain. 
Address of system punch table. 
Address of system printer table. 
Address of system reader table. 
Instruction processing address 
Address of BSS volume 



The HSS is online and the ESS 

communicator has been initialized 
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PSA 



Hexadecimal 


Field 






Eisplacement 


Naie 






39C 


ARSPAC 


DC 


V(DBKRSPAC) 


3A0 


AVHREAL 


DC 


A(0) 


3A4 


ASYSABHD 


DC 


A(0) 


3A8 


ASYSLC 


DC 


V(DHKSYSLC) 


3AC 


ASYSOP 


DC 


V(DMKSYSOP) 


3B0 


AHIOCT 


DC 


V(DIJKRIOCT) 


3B4 


ARIOCH 


DC 


V(DBKRIOCH) 


3B8 


ARIOCD 


DC 


V(DKKRIOCD) 


3BC 


ARIODV 


DC 


V(DBKRIODV) 


3C0 


ARIOCC 


DC 


V(DHKRIOCC) 


3C4 


ARIODC 


DC 


V(D!5KRI0nC) 


3C8 


ARIODC 


DC 


V{DKKRIODC) 


3CC 


ACORETBL 


DC 


V{DBKSYSCS) 


3D0 


APAGCP 


DC 


A(X«FFFFFF») 


3D4 


CPCREGO 


DC 


X»808008CO» 


3B8 


CPCREG6 


DC 


F'O* 


3DC 


CPCREG8 


DC 


F»0' 


3E0 


TIHEDISP 


DS 


IF 


3E4 


ASVCLIST 


DC 


V(DHKSVCNS) 


3E8 


AVMALIST 


DC 


V(DIIKPRVMA) 


3EC 


LASTDSER 


DC 


V(DKKSYSVH) 


3F0 


PAGECOR 


DS 


IF 


3F4 


MONNEXT 


DS 


1F 


3F8 


PAGEHD 


DS 


1F 


3FC 


PAGEIHXT 


DS 


IF " 


UOO 


TRACEFLG 


DS 


IF 



Field Description, Contents, Meaning 

Address of system accounting chain 

VBELCK address of virtual=real user. Note 

that AVHRIAL is maintained in both PSAs 
Address of system abend printer 
Address of SYSLCCS information 
Address of system operator VHELCK 
Address of real channel index table 
Address of first RCHELCK 
Address of first RCOELCK 
Address of first RDEVBLCK 
Address of count of real system channels 
Address of count of real system control units 
Address of count of real system devices 
Address of system CORTAELE 
Address of first pageable program 
CP architecture control and external mask 
CP assist and virtual machine assist mask 
HOHITCR CALL enable mask 
Timer displacement for charge 
Address of CP assist pointer list 
Address of expanded virtual machine assist 

pointer list 
Last user to be dispatched 
Current monitor buffer page address. 

Note that PAGECDR is in absolute PSA. 
Next available address in mcnitcr buffer. 

Note that MONNEXT is in absolute PSA. 
Last address in current monitcr buffer page. 

Note that PAGEND is in absolute PSA. 
Alternate mcnitof buff er page address. 

Note that PAGENXT is in absolute PSA. 
Trace table flaas 



400 



ORG TRACEFLG 
TRACFLG1 DS 1X 



Trace table flag 



Bits defined in TRACFLG1 





TRAC01 


"eqd 


X«80« 




TRAC02 


EQD 


X'40» 




TRAC03 


EQD 


X»20« 




TRAC04 


EQD 


XMO» 




TRAC05 


EQO 


X»08» 




TRAC67 


EQD 


X»04» 




TRAC08 


EQO 


X»02' 




TRAC09 


EQU 


X»01« 


401 


TRACFLG2 


DS 


IX 




Bits def; 


ined 


in TRACFLi 




TRACOA 


"eqd 


X»80' 




TRACOC 


EQD 


X»40» 




TRACOD 


EQD 


X'20» 




TRACBEF 


EQO 


XMO' 




TRAC10 


EQO 


X»08» 




TRAC11 


EQO 


X»04» 




TRAC12 


EQO 


X«02» 




TRAC13 


EQO 


X'01' 


402 


TRACFLG3 


DS 


1H 


404 


TTSEGCNT 


DS 


IF 


408 


PSARSV15 


DS 


5D 


430 


INSTWRD1 


DC 


F'0« 



External interrupt tracing en 
SVC interrupt tracing on 
Program interrupt tracing en 
Machine check tracing on 
I/O interrupt tracing on 
FREE/FRET call tracing on 
Enter dispatch tracing on 
Queue drop tracing on 

Trace table flag 



Run user tracing on 
Onstack I/O interrupt tracing on 
Virtual CSW stored tracing en 
SIO, TIO, and HDV tracing en 
Onstack lOBLOK or TRQBLOK tracing on 
Trace BTD activity for 370x NCP 
Lock spin tracing active 
Signal processor tracing active 

Reserved for IBM use 

Count of total page/swap tables in system. 

Note that TTSEGCNT is in absolute PSA. 
Reserved for IBM use 
Reserved for installation use 
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PSA 



Hexadecisal 
Displacement 



Field 
Nane 



434 
438 
43C 



440 
470 
478 
440 
480 
484 
488 
48C 
490 
494 
498 
49C 
4A0 
4A4 
4A8 
4AC 
4B0 
4B4 
4B8 
4BC 
4C0 
4C4 
4C8 
4CC 



INSTWRD2 DC 
IHSTWRD3 DC 
INSTWBD4 DC 



F»0« 
F»0» 
F'0» 



Field Description, Contents, Meaning 

Reserved for installation use 
Reserved for installation use 
Reserved for installation use 



List of 

ZEROES 

BLANKS 

FFS 

FO 

F1 

F2 

F3 

F4 

F5 

F6 

F7 

F8 

F9 

F10 

F15 

F16 

F20 

F24 

F60 

F240 

F255 

F256 

F4095 

F4096 



Fr egu e 
DC 
DC 
DC 
EQO 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 
DC 



ntly Used Constants 
6D»0' 
8X»40' 

8X»FF» Also = -1 

ZEROES 



•2« 
'3« 

'4» 

•5» 

•6» 
171 

»8» 
191 

M0» 

»15' 

•16' 

»20» 

»24» 

•60' 

'240* 

'255' 

»256» 

'4095' 

'4096' 



Also = X'CCCCOOOF' 



Also 
Also 
Also 
Also 
Also 
Also 



X'CCCC003C' 
X'COCCOOFG' 
X'CCCOOOFF' 
X'CCCOOIOO' 
X'CCCOOFFF' 
X'CCCOIOOO' 



= CO' 



4D0 
4D4 
4D8 
4DC 
4E0 
4E4 
4E8 
4EC 
4F0 
4F4 
4F8 
4FC 

500 

500 
540 
580 
5C0 
600 
640 
650 
660 
664 
668 

66C 
670 
678 
680 
684 



APTRLK DC 
NOADD DC 
X40FFS DC 
XRIGBT24 DC 
XPAGNDM DC 
XRIGHT16 DC 
AFREE DC 
AFRET 
AQCNHT 
ADSPCH 
APTRAN 



DC 
DC 
DC 
DC 



X2048BND DC 

PSBCLR2 DS 

DDMPSAVE DS 
SIGSAVE DS 
LOKSAVE DS 
MFASAVE DS 
SWTHSAVE DS 
LOCKSAV DS 
SVCREGS DS 
PREFIXA DC 
PREFIXB DC 
PSACPXBP DC 

RESVD DS 
WAITSTRT DS 
WAITEND DS 
PHTPAGES DC 
ACTIVTRQ DC 



VtDMKPTRLK) 

X^FFOOOOOO^ 

X^40FFFFFF^ 

X' OOFFFFFF ' 

X'OOFFFOOO' 

X'OCOOFFFF' 

V(DHKFREE) 

V(DHKFRET) 

V(DBKQCNWT) 

V (DBKDSPCHy 

V(DBKPTRAN) 

X'00FFF800' 

OF 

16F 
16F 
16F 
16F 
16F 

4F 

4F 
F'0» 
F'O' 
A(0) 

IF 

D 

D 

F'O' 

A(0) 



Entry to lo 
Frequently 
Frequently 
Isolate rig 
Isolate the 
Isolate the 
Entry to al 
Entry to re 
Entry to wr 
Entry to th 
Entry to th 
Locate a ha 



ck a page in storage 
used work value 
used work value 
ht 24 bits 

page numter 

right 16 bits 
locate free storage 
lease free storage 
ite a terminal message 
e VH/370 dispatcher 
e paging supervisor 
If-page boundary 



Start of second area cleared by CP 

initialization (DMKCPI) 
Save area for dump routine 
Save area for DHKEXT 
DKKLCK save area 
Save area for malfunction alert 
DMKVHASi? save area 
LOCK macro save area 
SVC save area 

Prefix value of this processor 
Prefix value of other processor 
Address of CPEXBLOK for switch SVC. 

Note that PSACPXBP is in absolute PSA. 
Reserved for IBH use 
Timer value at start of wait 
Timer value at end of wait 
Pages in PGBAIT at start of wait 
Address of active transit queue 
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PSA 



Hexadeci 


mal 


Field 




Displacement 


Nane 




688 




EMSPEND DC 


F'0« 






Bits defined 


in SUSPEND 






EMSPQDI EQD 


X'80» 






EMSPEXT EQO 


X»40» 






EMSPSYNC EQD 


X»20« 






EHSPSHD EQD 


XMO* 






EMSPCLKC EQD 


X»08» 






EMSINQSC EQD 


X»01» 


68C 




EMSREC DC 


F'0» 



690 



Bi ts defined in EMSREC 
EMSRQDl" EQO X^80» 
EMSREXT EQD X»aO« 
EMSRSYNC EQO X»20» 
EMSRSHD EQO XMO» 
EMSRCLKC EQO X»08« 



XCPEND 



DC 



F»0» 



Bits defined in XCPEND 
XCAPR EQO X»80» 
XCRES EQO X»40« 
XCWAK EQO X»20» 
XCDISP EQO XMO» 



69U 


IPDADDRX 


DC 


H'O' 


696 


LPDADDR 


DC 


H»0» 


698 


LPDADDRX 


DC 


H»0» 


69A 


APSTATOS 


DS 


6X 






ORG 


APSTATOS 


69A 


APSTAT1 


DC 


X»00» 




Bits def: 
APOOPER 


Lned 
"eqo 


in APSTAT1 
X'80' 




PROCIO 


EQD 


X»40« 




APONONLN 


EQO 


X»20» 




MPFEAT 


EQO 


XMO* 




CPINITD 


EQO 


X»01« 


69B 


APSTAT2 


DC 


X«00» 




Bits defined 
CPMCHLK EQD 


in APSTAT2 
XMO« 




CPPTLBR 


EQD 


X«02« 


69C 


CPTERMLK 


DC 


X»00» 


69D 


CPFRELK 


DC 


X«00» 


69E 


FRLKPROC 


DC 


X«00« 


69F 


CPFRESW 


DC 


X»00» 


6A0 


AHCHAREA 


DC 


F»0» 


6A4 


SHRLKCKT 


DC 


F»0» 


6A8 


PROBSTRT 


DS 


1D 



Field Description, Contents, Heaning 
Emergency signal pending flags 



Quiesce pending 

Extend pending 

Synchroni2ation pending 

Shutdown pending 

High order TOD synchronization pending 

Processor is gaiesced 

Emergency signal received flags 



Quiesce reguest received 

Extend reguest received 

Synchronization reguest received 

Shutdown reguest received 

High order TOD synchronization received 

External call pending flags 



Automatic processor recovery pending 
Resume reguest pending 
Wakeup reguest pending 
Dispatch reguest pending 

P*7 Processor address of other processor 
P*8 Logical address of this processor 
P*9 Logical address of other processor 
Attached processor status bytes 



Attached processor status 



Attached processor operational 

Processor has I/O capability 

System generated for attached processor mode 

but running in uniprocessor mode 
Hultiprocessing feature is installed 
System initialization complete 

Second flag byte 



Machine check processing pending 

(for ECPS only) 

PTLE reguired for processor 

DMKMCT system termination is in progress. 

Note that CPTERMLK is in absolute PSA. 
Free storage extend pending. 

Note that CPFRELK is in absolute PSA. 
Logical processor identification for CPFRELK. 

Note that FRLKPROC is in absolute PSA. 
DMKFHE must transfer execution to the 

attached processor. Note that CPFRESW 

is in absolute PSA. 
Address of EMKMCH work area 
Count of times CPSHRLK is set (used to clear 

CPSHRLK) 
Virtual machine time out gueue at dispatch 
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PSA 



Bezadeciaal 


Field 






Displacement 


Nane 






6B0 


CHGKEGS 


DS 


2F 


6B8 


RESERVED 


DS 


2F 


6C0 


ONSHRVH 


DC 


4(0) 


6C4 


TRACPROC 


DC 


X»00« 


6C5 


APSTAT 


DS 


3X 






ORG 


APSTAT 


6C5 


APSTAT3 


DC 


X»00» 



Field Description, Contents, Meaning 

Save area for charge synchronization 
Reserved for IBM use 
VMELCK for pending DBKVBAPs call 
(attached processor only) 

P*10 Processor identifier for CE trace table 
entries 
More attached processor status flag bytes 



Third attached processor status flag byte 



B it s defined in APSTAT3 
CPSYSLK EQD x'»^80« 



Other processor is spinning en lock 



6C6 



UJXti 

APSTAT4 DC 



APSTAT 
X«00» 



P*11 Fourth attached processor status flag byte 



Bits defined in APSTAT4 
CPLOKFL ~EQO ~ X«80» 
RECMODE EQO X»40» 
CPHCHSE EQD X»20» 

PROCSCHK EQU XMO* 
CPAPRPND EQD X»08» 
POFFLINE EQD X»04» 



6C8 


RESERVE 


DS 


2F 


6D0 


STACKVH 


DC 


A(0) 


6D4 


DNSHRVM2 


DC 


A(0) 


6D8 


ADMKCPE 


DC 


V(DMKCPE) 


6DC 


RESERVED 


DS 


5F 




PSECLR2 


DS 


OF 


6F0 


ALOKVM 


DC 


V(DMKLOKVH) 


6F4 


RESERVED 


DC 


IF 


6F8 


ALOKSP 


DC 


V(DHKLOKSP) 


6FA 


AEXTSP 


DC 


V(DMKEXTSP) 


700 


ATMRSN 


DC 


V(DMKTMRSN) 


704 


RESERVED 


DC 


3F'0» 


710 


HONREGS 


DC 


16F 


750 


L0KSAVE2 


DC 


16F 



PSAEND 



DS 



OD 



DMKLCK enabled for external interrupts 
Processor will record soft lachine checks 
Machine check processing pending (CPMCHSE is 

the replacement of CPMCHEK in APSTAT2) 
TOD synchronous check received 
Autosatic processor recovery pending 
Vary processor function in use 

Reserved for IBM use 

R11 for dispatcher unstacking 

R2 value for pending VMAPs call 

(attached processor only) 
Address of EMKCPE for IPCS use 
Reserved for IBM use 
End of second area cleared by CP 

initialization (DMKCPI) 
Entry to lock VMBLOK 
Reserved for IBM use 
Entry to spin on lock 
Entry to signal processor routine 
Entry to charge synchronization routine 
Reserved for IBM use 
Register save area for Monitor call 
Save area for switching to virtual 

machine in DHKLOK 

End of page usage 
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PiDIBLOK 



I i^PIELOK: PASSHQRD INVlilP BLOCK 



The PHDIBLOK is used to retain information about invalid passwords supplied with LCGCH 
and AOTOLOG commands. 



Q 


r ■■ "■ 


PWDDSRID 


— , 


8 




PWDDATE 


1 PUDTIHE 1 







PHDTIME (cont.) [ 


PiETEBHA 1 


8 


L_ _ 


PiDCHAIN 1 P*1 


1 P*2 |///RESEfiVED////| 

,. ., J 



Hexadecimal Field 
Displacement Name 




8 
E 

18 
1C 

1D 



PWDDSRID DS 


CL8 


PWDDATE DS 


CL6 


PHDTIME DS 


CL8 


PHDTERMA DS 


CL4 


PWDCHAIS DS 


F 


P«DIS?CT DS 


1X P*1 


PWDFLAGS DS 


1X P*2 


Bits defined 


in PHDFLAGS 



PWDLOG EQO X»8C« 
PWDALOG EQO X»40» 



Field Description, Contents, Meaning 

Dserid attempting LOGCU or ADTCLCG 

Date (mmddyy) 

Time (hh:mm:ss) 

Terminal address 

Address of next PWDIELOK 

Invalid password count 

Flags 



This block for LCGCB 
This block for ADTCLCG 



IE 



DS 



XL2 



Reserved for IBM use 
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Real I/O Control Blocks 



In order tc ccntrcl the activity of the I/O 
devices of the system and schedule I/O 
requests upon them, I/O control uses 
several types of control blocks. These 
blocks can be separated into two basic 
types: 



Static blocks that describe 
components of the I/O system. 



the 



Dynamic blocks that represent active and 
p€nujLn9 requests for I/O operations. 



The I/O components of the real system 
are described by one control block for each 
channel, control unit, and device available 
tc the control program. Onits present but 
net represented by control blocks are not 
available for either user-initiated or 
control program-initiated operations. 



BEIL COSTBOL UTJIT EtCCKS 



The Real Control Dnit Table is composed of 
Real Control Dnit Blocks (BCDELOK) , one for 
each control unit on the system. These 
blocks are similar to the BCHELOK in that 
they contain the control unit portion of 
the address and status flags, and a pointer 
to a queue of I/O requests. In addition, 
the RCDEtOK contains a pointer tc the 
ECEELQK for the channel to which it is 
attached. The RCDELCK contains a table of 
16 halfword entries that represent the 
displacment into the Real Device Table of 
its attached devices- This table is 
referenced in the same manner as the table 
in the ECBBLOK. 



RIJL DEVICE CCKTROL BLOCKS 



REAL CHANNEL CONTROL BLOCKS 



For each channel attached to the system 
there exists a Real Channel Control Block 
(RCHBLOK) which contains: 



The channel portion of the address of 
its attached units. 

Status flags indicating the channel's 
availability for scheduling- 

A two-way queue anchor pointing to the 
list of I/O requests waiting to use the 
channel. 



In addition, each RCHBLOK contains 32 
halfword indexes, arranged in ascending 
address order, that represent the 
displacement into the Real Control Dnit 
table of the control blocks for the control 
units attached to the channel. The 32 
entries are required because the control 
unit address may be made up of five bits 
from the unit address. To locate the 
control block for a given unit: 



Index into the table 
displacement equal 
control unit address. 



in the RCHBLOK a 
to twice the 



Each device and 3270 remote communications 
line in the system is represented by a Real 
Device Control Block (BEEVELCK) , contains 
the device portion of the unit address and 
status flags similar to those in ECHELCK 
and RCDELCK. There is also a pointer for 
those operations that are waiting fcr the 
device to become available. Fields that 
appear in the RDEVELOK and not in the other 
blocks include a pointer to the I/O requet^c 
that is currently active on the device, SIC 
counts, and a pointer tc error and sense 
information. The RDEVELOK contains a 
pointer tc the RCDELCK fcr the control unit 
to which it is attached and fields of 
device dependent information which do not 
affect the operation of I/C control. 

If the RDEVBLCK is associated with 3270 
remote communications line, then the 
RDEVELOK contains a pointer to NICELCKs 
that represents the resources on that line. 



INPDT/ODTEDT BLOCKS 



I/C requests that are active in the system 
are represented by Input/Output Blocks 
(ICELOK) . There is one ICELOK for each 
operation (that is, channel program) to be 
executed. The ICBLOK is constructed by the 
requesting task and contains such 
information as: 



2. Load the index value. 

3. Add the value to the base address of 
the Real Control Dnit Table. 



• The identity of the requester 

• The address of the channel program to be 
executed 
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The address to which ccntrcl is to be 
returned upon coipletion of the 
operation 

In addition, the lOBLOK contains status 
flags that indicate the current state of 
the operation (such as, whether or not an 
error has occurred, if an error recovery 
procedure (ERP) is in control, and the 
condition returned froi the SIO) and the 
CSW associated with the interrupt that 
signals the end of the operation. Since 
lOBLOKS are queued off various I/O control 
tlocks, they also contain forward and 
backward queue pointers. DMKIOS builds in 
then the real device address of the unit on 
which the operation is started. 



In genera 
given operat 
system by b 
device, cont 
until a path 
A SIO is then 
is complete, 
the RDEVBLOK 
maintained in 
time the disp 
on the queue 



1, the lOBLOK representing a 
ion progresses through the 
eing queued, in turn, from 
rol unit, and channel blocks 
is at last free to the device, 
issued. After the operation 

the lOBLOK is dequeued from 
and stacked on a queue 

the dispatcher, DHKDSP. Each 
atcher is entered, the entries 

are unstacked and control is 



passed to the point specified in the 
Interrupt Return Address (lOEIHA) . After 
I/C control stacks the ICELCK for the given 
task, it attempts to restart all of the 
components that have been freed by the 
completion of the operation. 



NEISORK IHTERFACE CCHTECt EtCCK 



There is one Network Interface Ccntrcl 
Elcck (HICBLOK) for each defined 370x and 
each resource attached to a 3270 
bisynchronous line. The NICELCK provides 
the correspondence between the line or 
device address and the physical resource 
connected to that line. This block not 
only defines the identity of the terminal 
type, line, or control unit but it also 
contains flags and status information 
pertaining to that resource. If the 
defined resource is a remote 3270 
component, the HICELOK contains the current 
line coordinates^ polling and selection 
characters information as well. 

The remainder of this section describes 
the real I/O control blocks. 
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RCHELCK 

BCHBLOK; HEAL CHANNIi BLOCK 

RCHBLOK Gcntains status and type information for the specified channel. The linkage to 
I/O tasks operated on by that channel and to the control units attached to that channel 

I is also maintained. The ARIOCH field of the PSA points to the first BCHELCK, which is 

I generated in contiguous storage. 



RCHADD I RCHLOCK 



I R*1 I R*2 I HCHQCHT 



RCHFIOB 



RCHLICB 



10 



18 



R*3 I R*t| I R*5 I R*6 I 



RCHSTIDC 



RCHRSTQ 



RCHCPIR 



20 I 



RCHCUTBL 



(Variable Length) 



Hexadecimal Field 
risplacement Name 



RCHADD DS 
RCHLOCK DS 
RCHSTAT DS 



1H 
1H 
IX 



R*1 



Field Description, Contents, Heaning 

Channel address 
Channel lock 
Channel status 



Bits defined in RCHSTAT 
RCHBUSY EQD X*80« 
RCHSCED EQD X'40' 
RCHDED EQD X»01» 



RCHTYPE DS 



1X 



Channel busy 

lOE scheduled on channel 

Channel dedicated 

R*2 Channel type 



Bits defined in RCHTYPE 

RCHSEL EQU X'80« Selector channel 

RCHBMX EQD X»40« Block multiplexer channel 

RCBKPX EQD X*20' Eyte multiplexer channel 

RCH370 EQD X»01' S/37C type channel (S/370 I/O instruction 

support) 

Number of ICELOKs queued off channel 
Pointer to first IGBLOK queued 
Pointer to last lOBLCK queued 
Channel data check count 
Channel control check count 
Interface control check count 
Channel chaining check count 
Result of STIDC instruction issued 
at CP initialization; if cc = 3, the 
content is X'FFFFFIFF' 
Address of channel to be restarted 
lOELOK operational on channel time 
Control units attached - RCDSTABT index 
(The index values must be multiplied 
by 8 and added to the beginning of the 
REIVELOK table (ARICDV).) 

RCHSIZE EQD (*-RCHBLOK) /8 RCHELOK size in doublewords (X»0DM 



6 


RCHQCNT 


DS 


1H 




8 


RCHFIOB 


DS 


IF 




C 


RCHLIOB 


DS 


1F 




10 


RCHDTCK 


DS 


IX 


R*3 


11 


RCHCCCK 


DS 


1X 


E*H 


12 


RCHIFCC 


DS 


IX 


R*5 


13 


RCHCHCK 


DS 


IX 


R*6 


14 


RCHSTIDC 


DS 


IF 




18 


RCHRSTQ 


DS 


IF 




1C 


RCHOPER 


DS 


IF 




20 


RCHCDTBL 


DS 


32H 
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RCUBLOK 



RCDBLOK: REAL CONTROL ONIT BLOCK 



RCUBLOK provides control and status inforaation en a defined real control unit. Linkages 
I are provided to queued lOBLOKs. The ARIOCO field of the PS4 points to the first RCDBLOK, 
1 which is generated in contiguous storage. 




8 
10 
18 
20 
28 



RCDADD 1 RCOLOCK 


R*1 


1 R*2 1 RCDQCHT 


RCOFIOB 


RCDLIOB 


RCOCHA 


RCDCEB 


RCDCHC 


RCDCED 


RCDRSTQ 




RCOOPER 



RCDDVTBL 



(Variable Length) 



Hexadecimal Field 
Eisplacement Naae 






RCOADD DS 


1H 


2 


RCOLOCK BS 


1H 


4 


RCDSTAT DS 


IX 




Bits defined 


in RCDSTAT 




RCDBUSY EQD 


X»80» 




RCDSCED EQD 


X'40» 




RCDDISA EQD 


X»20» 




RCOCHAOF EQD 


X»08» 




RCDCHBOK EQD 


x«oa» 




RCDCHCOF EQD 


X»02» 




RCDCHDOF EQD 


X'01» 


5 


RCDTYPE DS 


IX 




His defined 


in RCDTYPE 



6 

8 

C 

10 



10 



RCDSOB EQD X«40« 

RCD2703 EQD X»03» 

RCD2702 EQD X»02' 

RCD2701 EQD X'01» 

RCUQCNT DS 1H 

RCDFIOB DS 1F 

RCDLIOB DS IF 

RCDCHA DS 1F 



ORG 
RCOPRIME DS 



RCDCHA 
1F 



Field Description, Contents, Meaning 

Control unit address 
Control unit lock 
B*1 Control unit status 



Control unit busy 

lOE scheduled on control unit 

Control unit disabled 

RCDCEA to RCHBLCK path is not available 

RCOCEE to RCHBLCK path is not available 

RCDCHC to RCHBLCK path is not available 

RCDCBE to RCHBLCK path is not available 

R*2 Control unit type 



This control unit can be attached to only one 

subchannel 
This is a subordinate control unit 
TCD is a 2703 
TCD is a 27C2 
TCD is a 2701 

Number of ICBLOKs queued off control unit 
Pointer to first ICBLOK queued 
Pointer to last lOBLCK queued 
Pointer to RCHBLCK - path A 



Pointer to the primary control unit 
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ECDELCK 



Hexadeciaal Field 
Displacement Name 



Field Description, Contents, Meaning 

Pointer to HCHEtOK - path E 

Pointer to ECHBLCK - path C 

Pointer to BCHBLOK - path E 

Address of control unit to be restarted 

lOELCK operational on control unit time 

Devices attached - ED7STiBT index 

(The index values must be multiplied 
by 8 and added to the beginning of the 
EDFVELOK table (AEIOD?).) 

BCUSIZE EQU (*-ECDBL0K)/8 ECDEEOK size in double¥ords (X»08») 



14 


ECDCHB 


DS 


IF 


18 


RCOCHC 


DS 


IF 


1C 


ECDCHD 


DS 


IF 


20 


BCDBSTQ 


DS 


IF 


24 


ECDOPER 


DS 


IF 


28 


RCDD7TBL 


DS 


16H 
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RCWTASK 



RCHTASK: TRANSLATED VIRTUAL I/O CCW 



RCWTASK contains the virtual-to-real CCW translation and other data related to a virtual 
aachine's I/O operation. A pointer is maintained to the virtual CCH operation. The first 
CCW-16 points to the beginning of RCWTASK. 



1 


RCHPNT 1 


RCiVCAW 


— 1 


8 1 


RCWVCHT 1 BCWRCNT | 


RCWHEAE 1 RCWCCHT 




10 1 


RCWCCW 







(Variable Length) 



Eexadecinal Field 
Eisplacement Nane 






RCWPNT 


DS 


1F 


n 


RCiVCAB 


ES 


IF 


8 


RCHVCNT 


BS 


1H 


A 


RCSECNT 


BS 


1H 


C 


RCiHEAD 


DS 


1H 


E 


RCWCCNT 


DS 


1H 


10 


RCWCCW 


DS 


ID 






ORG 


RCWCCW 


10 


RCWADDR 


DS 


1F 


14 


RCRFLAG 


DS 


IX 


15 


RCWCTL 


DS 


IX 




Bits def 


ined 


in HCWCTL 




RCWIO 


EQD 


X«80« 




RCWGEN 


EQD 


x»ao» 




RCHHHR 


EQD 


X»20' 




RCWREL 


EQD 


XMO« 




RCWISAH 


EQD 


X'08« 




RCW2311 


EQD 


X«04» 




ECWINVL 


EQD 


X»02» 




RCiSHR 


EQD 


X»01' 


16 


RCWCNT 


DS 


1H 






ORG 


RCWADDR 


10 


RCWCOMND 


DS 


IX 



Field Description, Contents, Meaning 

Pointer to next RCWTASK 

Virtual address of CCW chain 

Virtual CCW count 

Real CCW count 

RCWTISK header nark X'FFFF* 

RCWTASK control word count 

One or more CCWs for device I/O 



CCW data address 

CCW flag tits 

CCW CP-control tits 



I/O data page locked 

CP-generated CCW 

EBKOBT must relocate home address/record HO 

CCW address relocatable if CCWs moved 

ISAH modifying CCW 

TYP2311T-E pseudo 2311 on 2314 

CCW operation code or address is invalid 

Shared user page was copied 

CCW byte count 



CCW command code 
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EDEVBLCK 



EBEVELOK: REAL DEVICE BLOCK 



RDEVELOK is generated by the RDEV macro at systei generation. There is cne RDEVELCK for 
each real device and one for each binary synchronous line. The block contains status and 
device paraaeters applicable to I/O instruction processing- The AEICE7 field of the PSA 
and the VDEVREAL field of the YDEVBLOK point to the first RDEVELCK, which is generated in 
contiguous storage. 






RDEVADD 1 RDEVLOCK | R*1 


1 R*2 1 R*3 1 R*4 


1 


8 


RDEVFIOB 




1 


REEVLIOE 




10 


RDEVCDA 




1 


RDEVCDB 


1 


18 


■' ■ ■ ■■ - - ■■ ■ — 1 

RDEVQUED | 

1 


20 


RDEVIOCT 




1 


RDEVAIOE 


1 


28 


RDEVDSER 




1 RDEVATT 1 EDEVCYL 




30 






RDEVSER 


1 RDEVLHKS 




38 


RDEVTCTL 


(8 


device deper 


ident bytes) 




40 


RDEVTMAT 




1 R*5 


1 R*6 1 R*7 1 R*8 




48 


RDEVIOER 




1 


REEVCTRS 




50 


RDEVHAME |//RDEVRSV1///| 

L _ _ _ 


RDEVIOBL 


— 1 



Hexadeciaal Field 
Displacement Name 



Field Description, Contents, Heaning 



RDEVADD DS 
RDEVLOCK DS 
RDEVSTAT DS 



1« 
1H 
1X 



R*1 



Device address 
Device lock 
Device status 



Bits defined in RDEVSTAT 



RDEVBUSY EQU 
RDEVSCED EQU 
RDEVDISA EQO 
RDEVRSVD EQD 
RDEVIRH EQU 
RDEVHRDY EQU 
RDEVWAII EQU 
RDEVDED EQU 



X'80» 
X'40' 
X»20' 
X»10» 
X«08» 
X»04« 
X«02' 
X»01« 



Device busy 

lOE scheduled on device 
Device disabled (offline) 
Device reserved 

Device in intensive error recording mode 
Device intervention required 
GRAF - lOELCK pending, queue requests 
Dedicated device (attached to a virtual 
machine) 
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RDEVBLOK 



Hexadecimal Field 
Eisplacement Name 



RDEVFLAG DS 

Bits defined 
RDEVSKOP EQU 
RDEVPREF EQD 
RDE¥SYS EQO 
RDEVOWN EQD 
RDEVMOOT EQO 
RDEV333? EQD 
RDEVSEL EQD 
RDEVPSDP EQD 
RDEVPREP EQD 
RDEVaCTV EQD 
RDEVIDHT EQO 
RDEVENAB EQO 
RDEVHIO EQO 
RDEVDISB EQO 
RDE7EPMD EQD 
RDEVDRAN EQD 
RDEVTERM EQO 
RDEVACNT EQD 
RDEVSPAC EQD 
RDEVRSTR EQO 
RDEVBACK EQO 
RDEVSEP EQD 
RDEVLOAD EQO 
RDEVLNCP EQO 
RDE7LCEP EQO 
RDE?SLOi EQO 
RDEVADTO EQD 
RDEVHAIT EQO 
RDEfEPLH EQO 
RDEVRCVY EQO 
RDE?TBTO EQO 



1X 



Field Description, Contents, Meaning 
H*2 Device flags, device dependent 



in RDEVFLAG 



•80 
•40 
•20 
'10 
•08 
•04 
•02 
•80 
•40 
•20 
•10 
•08 
•04 
•02 
•01 
•80 
•40 
•20 
•10 
•08 
•04 
•02 
•01 
•80 
•40 
•20 
•10 
•08 
•04 
•02 
•01 



6 


RDEVTYPC 


DS 


IX 


7 


RDEVTYPE 


DS 


IX 


8 


HDEVFIOB 


DS 


IF 


C 


RDE¥LIOB 


DS 


IF 


10 


RDEVCOA 


DS 


IF 


14 


RDEYCDB 


DS 


IF 


18 


RDEVQOED 


DS 


ID 


20 


RDEVIOCT 


DS 


IF 


24 


RDEVAIOB 


DS 


IF 


28 


RDEVOSER 


DS 


IF 


2C 


RDE?ATT 


DS 


1H 


2E 


RDEVCYL 


DS 


1H 


30 


RDEVSER 


DS 


CL6 


36 


RDEVLNKS 


DS 


1H 


38 


RDEVTCTL 


DS 


8X 


40 


RDEVTMAT 


DS 


IF 


44 


RDEVQCNT 


DS 


IX 



DASD - ascending order seek queuing 

EASE - volume preferred for paging 

ESSE ~ voluBS attached tc systes 

EASE - CP-owned volume 

EASE - volume mounted, not attached 

BASE - volume dedicated as 3330V 

EASE - device selected for BSS lount 

Console - terminal has print suppress 

Console - terminal executing PREPARE command 

Console - ICBLOK pending; gueue request 

Console - 2741 terminal code identified 

Console - device is enabled 

Console - next interrupt from a Halt I/O 

Console - device is to be disabled 

Console - 370x HCP resource in EP mode 

Spooling - device output drained 

Spooling - device output terminated 

Spooling - device busy with accounting 

Spooling - force printer tc single space 

Spooling - restart current file 

Spooling - backspace the current file 

Spooling - print/punch job separator 

Spooling - DCS buffer verified 

Special - network control program active 

Special - 270x Emulation program active 

Special - 370x in buffer slowdown mode 

Special - automat i^ -'^*^>^J-*^'^^-^^^ 

Special - ICBLOK pending; gueue requests 

Special - emulator lines in use by system 

Special - automatic dump/lead process active 

Special - BID trace requested 

R*3 Eevice type class (see "Appendix A. 
CP and RSCS Equate Symbols") 

R*4 Eevice type (see "Appendix A. 
CP and RSCS Equate Symbols") 
Pointer to first ICBLOK queued 
Pointer to last lOELCK queued 
Pointer to RCDBLOK - interface A 
Pointer to RCDBLOK - interface E 
lOELCK queued time - TOD clock units 
Device I/O count 
Active lOELCK 

Pointer to VMBLCK of dedicated user 
Attached virtual address 
EASE - current cylinder location 
Device volume serial number 
EASE - number of links to this disk 
8 device-dependent terminal control bytes 
Eevice attached time - TOD clock word 

R*5 Number of queued ICBLCKs 
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EDEVELCK 



Hexadecimal 


Field 








Displacement 


Name 








45 


RDE¥STA2 


DS 


1X 


R*6 




Bits defined 


in RDEVSTA2 




RDE¥HiCT 


EQO 


X»80' 






RDEVBDCH 


EQD 


X»40» 






EDEVCONC 


EQD 


X«20» 






RDEVDROP 


EQU 


X«10» 






RDEVALT 


EQD 


X»08» 






RDEVSYBC 


EQD 


X»04' 






EDEVPDRG 


EQD 


X«02» 






RETEYSW 


EQD 


X'01« 




46 


RDEVMDL 


DS 


IX 


R*7 


47 


RDEVFTR 


DS 


IX 


E*8 


48 


RBEVIOER 


DS 


IE 




4C 


RDEVCTRS 


DS 


IF 




50 


RDEVNAHE 


DS 


1H 




52 


RDEVRSV1 


DS 


1H 




54 


RDE¥IOBL 


DS 


IF 





2E 
30 



18 
1C 

28 
2C 
2D 
2E 
2F 

30 

34 
38 
40 



18 
1C 

38 



Field Description, Contents, Heaning 
R*6 Device status (byte 2) 



Active device is being reset 
Device is busy with the channel 
Contingent connection present 
Logdrop or loghold indicated 
Alternate path device 
Attention signal during active I/O 
3800 - Purge files in error 
Retry count switch 

Device model number 

Device feature code 

Pointer to lOEEBLOK for last CP error 

Pointer to error counter control block 

Real device name 

Reserved for IBH use 

lOELCK gueue lock 

RDEVSIZE EQD (*-RDEVELOK) /8 RDEVELOK size in doublewords (X«OB») 



For CP-owned Devices 





ORG 


RDEVDSER 


28 


RDEVALLN DS 


IF 


2C 


RDEVCODE DS 


1H 




ORG 


RDEVTCTL 


38 


RDEYPAGE DS 


IF 


3C 


EDEVRECS DS 


1F 


40 


RDEVPNT DS 


IF 




For Slotted 230J Paging 




ORG 


EDEVRECS 


•ar 


DTM?wnr"a'T nc 


11? 



For Grajghic Devices 

ORG RDEVCYL 
RDEVCORD DS 1H 
RDEYGRTB DS IF 



Anchor for ALOCELOK chain for this device 
Device code - SYSOiNED index 

Anchor for RECBLCK chain for paging 
Anchor for RECBLOK chain for spooling 
Pointer to next RDEVELOK fcr allocation 



TjQ-in-l-oT^ 4-Q PuriMTlPT CC'^rOl blCCk 



Current line coordinates 

Address of table of CClis and data streams 



For Spooling Dnit Record De vi c es 



EDEVSPL 
EDEVCLAS 

BDEVDELP 
RDEVCORP 

RDEYMAXP 
RDEVFSEP 



ORG 

DS 

DS 

ORG 

DS 

DS 

DS 

DS 

DS 



RDEVXSEP DS 

RDEYEXTN DS 
RDEVIMAG DS 
RDEVOVLY DS 



RDEYQDED 

IF 

4C 

RDEVDSER 

A 

1X 

IX 

IX 

IX 

CL4 

1A 

CL8 
CL4 



For Terminal Devices 



ORG 
RDEVCOS DS 
RDEVAIRA DS 

ORG 
RDEVRCNT DS 



RDEVQDED 

IF 

IF 

RDEVTCTL 

1H 



Pointer to active RSPLCTL block 
Device class (es) 

Anchor for delay purge queue 

Current page length in half inches 

Reserved for IBB use 

Haximum number of entries in delay purge queue 

Function control block for separator 

page (6, 8, or 12) 
Name of character arrangement table fcr the 

separator page 
Pointer to the 3800 extension 
Name of current image library 
Name of current forms overlay 



Pointer to CONTASK list 

Attention interrupt return address 



Start/stop line retry count 
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RDEVBLOK 



Eexadeciial Field 
Displacement Naie 



3A 



3B 
3C 

3D 
3E 
3F 



RDEVTFLG DS 



IX 



Bits defined in RDEVTFLG 
RDEVLOG EQO X«80» 



RDE¥REST E"0 
RDEVATOF EQD 



RDEVLOG 

RDEVMORE 

RDEVRDN 

RDEVREAD 

RDEVCPNA 

RDEVTRQ 

RDEVCTL 

RDEVHOLD 



EQD 
EQO 
EQD 
EQD 
EQD 
EQD 
EQD 
EQD 



RDEVGRTY DS 
RDEVLLEN DS 
RDEVATNC DS 
RDEVBASE DS 
RDEVRSV3 DS 



X««*0» 
X'20' 

X»80« 
X»40« 
X'20« 
X»10» 
X»08« 
X»04» 
X»02' 
X«01» 

IX 
1X 
IX 

1H 
IX 



Field Description, Contents, Beaning 
Additional terminal flags 



TERM and GRAF - Logon process has been 

initiated 
TERK ~ Tersinal in reset *^rocess 
TERM - Suppress attention signal 

GRAF - Logon process has been initiated 
GRAF - Screen full; more data waiting 
GRAF - Screen in running status 
GRAF - Read pending for screen input 
GRAF - Last input not accepted 
GRAF - Timer reguest pending 
GRAF - Control function interrupt pending 
GRAF - Screen full; in hold status 

Display alternate screen size index 

Device line length 

Device attention count 

370x base address for emulator line 

Reserved for IBM use 



46 



ORG 
RDEVTMCD DS 



RDEVMDL 
1X 



Terminal code 



47 



30 
34 



Bits defined in R DEVT MCD 

RDEVTEXT EQD X«20» 

RDEVDSC8 EQD X'10' 

RDEVAPLC EQD X • OC • 

RDEVAPLP EQD X»08» 

RDEVCORR EQO X»04» 

RDEVPTTC EQD X»00» 

RDEVSADH DS IX 



3270 Text character set 
ASCII-8 level keyboard 
APL Correspondence keyboard 
APL PTTC/FBCD keyboard 
Correspondence keyboard 
PTTC/EBCt keyboard 

Terminal set-address number 



F o r Real 3704/3705 C ommunications Controller 





— 


ORG 


RDEVAIRA 


1C 


RDEVEPDV 


DS 


IF 






ORG 


RDEVCYL 


2E 


RDEVMAX 


DS 


1H 


30 


RDEVNCP 


DS 


CL8 


38 


RDEVHICL 


DS 


1F 


3C 


RDEVCKPT 


DS 


IF 




For 3270 


Remote Support 



ORG RDEVNCP 
RDEVBSC DS 1F 
RDEVPDLY DS IF 



Start of free RDEVBLOK list for EP line 

Highest valid NCP resource name 
Reference name of active 3704 NCP 
Pointer to network control list 
Pointer to CKPBLOK for re-enable 



Pointer to binary synchronous control block 
Poll delay timer interval 
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RECBLCK 

BJCBLOK: DASp PAGE (SLOT) ALLOCATION BLOCK 

EECBLOK Maintains the correlation of DASD storage pages to a specific cylinder location. 
Also maintained is a bit map to indicate the page slots available for data page storage. 
The RDEVRECS field and the BDEVPAGE field of the BDEVELCK point to RECELCK. 

I • ' 1 

I RECPNT I RECCYL | B*1 | B*2 | 

I 1 

8 i BECHAP I 

• m 

(128 pages naxinue) 



Field Description, Contents, Meaning 

Pointer to next RECBLOK on chain 

Cylinder address for pages in this block 

Humber of pages currently in use 

Haxinum number of pages available 

Page allocation bit map (128 pages naximuB) 

lits defined in RECMAP 

- Page is available 

1 - Page has been assigned 

N ot e; Although the size of RECMAP is fixed, the Maxiium number of pages 
available on a cylinder is device dependent. Bits corresponding to pages 
not physically present on a cylinder are set to 1. 

EECSIZE EQD (*-BECBLOK) /8 BECELOK size in doutiewords 



Hexadecimal 


Field 








Eisplacement 


Name 











RECPNT 


DS 


IF 




4 


RECCYL 


DS 


1H 




6 


RECUSED 


DS 


IX 


B*1 


7 


RECMAX 


DS 


1X 


B*2 


8 


BECMAP 


DS 


1L 
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BECPAG 



RECPAG: ERROR RECORDING PAGE RECORD 



RECPAG retains up to 4K bytes of error recording data for eventual placement on the 
specified error recording cylinder. 



8 I 



RECCCPD 



I RECNXT I R*1 1 R*2 | 
1 



RECDATA (4088 bytes) 



Bexadeciial Field 
Displacement Name 



RECCCPD DS 
RECNXT DS 
RSCFLAG1 DS 



Field Description, Contents, Heaning 

4X CCPE of the record 

2X Displacement to next error record 

IX R*1 Record usage flags 



Bits defined in RECFIAG1 
RECPAGID EQD X«80» 



RECPAGFR 


EQD 


x«ao» 


RECPAGFL 


EQD 


X»20» 


RECPAGER 


EQD 


XMO* 


RECPAGFA 


EQD 


X»08» 


RECFLAG2 


DS 


IX 



Page contains valid data 

Page is cleared 

Page is full of error records 

Next page is unreadable (I/O error) 

Page contains page frame records 

R*2 Record format flag 



liis defined in RECFLAG2 
RECPAGFH EQD X«80» 



RECPAGDN EQD X»00» 
8 RECDATA DS 4088C 

RECPAGSZ EQD (*-RECPAG) /8 



Set in page 1 of a recording cylinder when 
the cylinder is being formatted. This flag 
bit is reset when all pages are cleared. 

Cylinder formatted 

Data area 

Size of page in doublewords (X'512*) 
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RSPLCTL, RSPXBLOK 



ESPLCTL: REAL SPOOLING CONTROL BLOCK 



RSPLCTL is used in conjunction with SFBLOK for processing closed spool files. 
REEVSPL field of RDEVBLCK points to ESPLCTL. 



The 





8 

10 

18 

20 



1 


RSPRSTRT 


RSPEPAGE 1 


1 RSPVPAGE 


RSPEPAGE 1 


1 RSPMISC 


RSPSFBLK 1 


1 RSPDPAG2 


RSP7PAG2 1 
• 


! RSPHP21G2 


R*1 


! //////R S P R S 7D ////// 1 



Bexadeciaal Field 
Displacement Name 






RSPRSTRT 


DS 


IF 


a 


RSPDPAGE 


DS 


1F 


a 


RSPVPAGE 


DS 


IF 


c 


RSPRPAGE 


DS 


IF 


10 


RSPHISC 


DS 


IF 


14 


RSPSFBLK 


DS 


IF 


18 


ESPDPAG2 


DS 


1F 


1C 


RSPVPAG2 


DS 


IF 


20 


RSPRPAG2 


DS 


IF 


24 


RSPFLAG1 


DS 


IX 



25 



Bits defined in RSPFLAG1 
RSPBF1I0 EQD X'80» 
RSPBF2I0 EQD X»40' 
RSPBF1TL EQU X'20» 
RSPBF2VL EQO X« 10» 



RSPRSYD DS 



3X 



RSPSIZE EQD (*-RSPLCTL)/8 



Field Description, Contents, Heaning 

Restart CAW - CCW address 

EASE location (DCHR) of current page buffer 

Virtual address of page tuffer 

Real address of page buffer 

Ose varies according to caller 

Pointer to SFBLCK for file 

EASE location of second page buffer if any 

Virtual address of second page buffer if any 

Real address of second page buffer if any 

Heal spooling control flag byte 



I/O pending on buffer 1 

I/O pending on buffer 2 

Buffer 1 is full of data to print 

Buffer 2 is full of data to print 

Reserved for IBB use 

Size in doublewords (X*05*) 



RSPXBLOK: REAL DEVICE EXTENSION BLOCK 



RSPXBLOK is used with the RDEVBLOK to accommodate the 3800 requirements. 



( 
I- 
8 I 



RSPXCHR 



RSPXCMOD 



RSPXCRWC 



RSPXFCB 



Hexadecimal Field 
Displacement Name 






RSPXCHR DS 


CL4 


4 


RSPXCRWC DS 


4X 


8 


RSPXCMOD DS 


CL4 


C 


RSPXFCB DS 


CL4 



RSPXSIZE EQU 



Field Description, Contents, Meaning 

Character arrangement table now in 3800 
Current contents of WCGMs 
Copy module now in 3800 
FCB now in 3800 

(*-RSPXBL0K)/8 RSPXBLOK size in doublewords (X'Ol') 
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SAVEAREA 



SAYEABEA 



SAVEAREA Is used to save the registers cf a module when that nodule has called another 
■cdule. Register 13 points to SAVEAREA. 



SAVERETN 



SAVER12 



8 
10 



SAVER13 



SAVEWRKI 



SAVEREGS 



40 



48 



50 



58 





SAVEWRK2 


1 SAVEiRKS 






SAVEWRK4 


1 SAVIHRK5 






SAVEWRK6 


1 SAVEHRK7 




L 


SAVEWRK8 


1 SA¥E«RK9 





Hexadeciaial Field 
risplacement Name 



SA¥ERETN DS 



1F 



Field Description, Contents, Beaning 
Active SAVEAREA (caller's return address) 



l6^®fiJ5iii51 of SAVERETN To I n c lud e Proces sor Address 
ORG SAVERETH 

Active SAVEAREA — processor address 
Active SAVEAREA — return address 



Inactive SAVEAREA (next SAVEAREA address) 






SAVEPROC 


DS 


IX 


1 


SAVERTN 


DS 


3X 






ORG 


SAVERETH 





SAVENEXT 


DS 


IF 


4 


SAVER 12 


DS 


IF 


8 


SAVER 13 


DS 


IF 


C 


SAVEWRK1 


DS 


IF 


10 


SAVEREGS 


DS 


12F 






ORG 


SAVEREGS 


10 


SAVERO 


DS 


IF 


14 


SAVER 1 


DS 


IF 


18 


SAVER2 


DS 


IF 


1C 


SAVER3 


DS 


IF 


20 


SAVER4 


DS 


IF 


24 


SAVER5 


DS 


IF 


28 


SAVER6 


DS 


IF 


2C 


SAVER7 


DS 


IF 


30 


SAVER8 


DS 


IF 


34 


SAVER9 


DS 


IF 


38 


SAVER10 


DS 


IF 


3C 


SAVER 11 


DS 


IF 


40 


SAVE1IRK2 


DS 


IF \ 


44 


SAVEHRK3 


DS 


IF 


48 


SAVEnRK4 


DS 


IF / 


4C 


SAVEWRK5 


DS 


IF ( 


50 


SAVEWRK6 


DS 


IF / 


54 


SAVEWRK7 


DS 


IF I 


58 


SAVEWRK8 


DS 


IF ] 


5C 


SAVEWRK9 


DS 


IF / 




SAVESIZE 


EQD 


(*-SAVEA 



Caller's tase (R12) 
Caller's SAVEAREA (R13) 
Called routine's work area 
Caller's registers (BO to fill) 



Called routine's work area (8 fullwords) 



(*-SAVEASEA)/8 Size in doutlewords (X'OC) 



92 IBM VM/370 Data Areas and Control Block Logic 



SAVTAELE 

SATTABLE; FIRST PAGE ON SAVED SYSTEM DASD 

SAVTABLE is used in the initial program loading of saved virtual machine named systems. 
It is created by the name system generation process (SA7ESIS macro/SAVESlS command) . 



I 
I- 
8 I 



SAVPSH 



SAVGREGS 



48 I 



SA?FPRES 



68 I 



SAVCREGS 



A8 I 



SAVKEYS 



Eezadecimal Field 
Displacement Name 





SAVPSS 


D3 


1D 


8 


SAYGREGS 


DS 


16F 


48 


SAVFPRES 


DS 


4D 


68 


SA?CREGS 


DS 


16F 


A8 


SAVKEYS 


DS 


1H 



Field Description, Contents, Beaning 

PSw cf virtual machine at SAVESiS time 

General registers 

Floating-point registers 

Control registers 

Two-tyte entry for each saved page 

containing storage keys for each page 
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SDRBLOK 



SDRBLOK: STATISTICAL DATA RECORDIUG BLOCK 



Contains counters to record temporary errors on a given I/O device. 



8 
10 
18 



r— 




SDRRDEV 


1 S*1 1 S*2 


1 


S*3 1 S*4 




S*5 


1 SDRCDA 


1 














1 
f 


SDRCTRS1 













EezadeciEal Field 
Displacement Name 






SDRRDEV DS 


IF 


4 


SDRFLAGS DS 


IX 




Bits defined 
SDRSHRT EQD 


in SDRFLAGS 
X'80» 




SDRRECD EQO 


X»40» 




SDRHAX EQO 


X»20« 


5 


SDRPRMCT DS 


IX 


6 


SDRFLCT DS 


IX 


7 


SDROVFWK DS 


IX 


8 


SDRLHGTH DS 


1X 


9 


SDRCDA DS 


3X 




SDRBSIZE EQD 


(♦-SDRBLOK 


C 


SDRCTRS DS 


10X 



16 



SDRSIZE EQD 
SDRCTRS1 DS 



Field Description, Contents, Beaning 

Address of associated RDBVELCK 
S*1 SDRELOK flags 



Short OBRRECN to be written 

Long OERRICH to be recorded en counter 

overflow 
Hazimum numbers of SDR counters handled 

S*2 Parameter list counter 

S*3 Full byte counter 

S*4 Statistical update work byte 

S*5 Length kbytes) of SDR counters 

Primary CDA of device being used 

SDRELOK base size, in bytes 

SDR error counters 

(*-SDREL0K+7)/8 Size in doublewords {X«03») 

10X Additional SDR error counters for devices 

that use more than 10 SDR counters. 



SDRSIZE 1 EQD (*-SDRELCK) /8 Size in doublewords (X»04») 
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SEGTAELl 



SECT ABLE: TRANSLATION SEGMENT TABLE 

SEGTABLE is used in conjuncticn with the page table (PAGTAELE) and swap table (SWPTABLE) 
by the page aanagement routines- The VBSEG field of the VBELOK points to SEGTABLE. 



1 S*1 I 
I 



SEGPAGE 



Bexadeciial Field 
Eisplacement Nane 



SEGPAGE DS 



SEGPLEN 



ORG 
DS 



1F 

SEGPAGE 
BL.U 



Field Description, Contents, Beaning 
Pointer to page table (PAGTAELE) 



S*1 Page table length (Total pages - 1) (in left 
half of byte) 



Mis defined in SEGPAGE»3 
SEGINV EQU X*01» 
SEGBIG EQD XMO» 
SEGENQ EQU X»40« 



Segment invalid 

Segment migrated if pointer is equal to 

Segment is enqueued if pointer is equal to 
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SFBLOK 



SFBLOK: SPOOL FILE BLOCK 



SFBLOK retains all the information relating to a spool file. A pointer provides a linkage 
to the next SFBLOK in the chain. The VSPSFBLK field of VSPLCTL and the BSPSFBLK field of 
RSPLCTL point to the SFBLOK. 



1 SFBPNT 


1 


SFBSTAHT 


1 SFBUSEE 


1 SFBORIG 


1 SFBRECSO 


1 


SFEBFCSZ 1 SFBFILID 


1 S*1 1 S*2 1 


SFBMISC1 1 


SFERECS 




SFBFHAME 




1 


r 

1 
1 

SFBFTYPE 




1 SFBEATE 


! SFBTIHE 


1 SFBLAST 


1 


SFECOPY 1 S*3 1 S*4 


1 SFBDIST 


1 SFBFLASH 


1 


S*5 I//////SFERSVD////// 



10 



18 



20 



28 



34 
40 
48 
50 
58 
60 

L 



Eexadeciial Field 
Displacenent Nane 




4 
8 
10 
18 
1C 
IE 
20 



SFBPNT DS 
SFBSTAHT DS 
SFBDSER DS 
SFBORIG DS 
SFBRECHO DS 
SFBRECSZ DS 
SFBFILID DS 
SFBFLAG DS 



IF 
IF 

CL8 

CL8 

IF 

1H 

1H 

IX 



S*1 



Field Description, Contents, Meaning 

Pointer to next SFBLOK 

EASE location (CCPB) of first page buffer 
VMDSIR identification of file owner 
7M0SIR identification of file origin 
Huaber of data records in file 
Logical record size - excluding CCWs 
Binary system file nuaber 
SFELOK control bits 



Bits defined in SFBFLAG 



21 

22 
24 

28 



SFBINOSE EQD 
SFBRECOK EQO 
SFBDHOLD EQO 
SFBDDMP EQO 
SFBOPEN EQD 
SFBSHOLD EQD 



SFBEOF 



EQU 



SFBRECER EQD 



X«80» 
X«40» 
X'20» 
XMO' 
X'08« 
X«04» 
X»02» 
X»01» 



SFBTYPE DS 1X 

SFBMISC1 DS IB 

SFBRECS DS IF 

SFBFNAME DS CL12 



File being processed 
Allocation records complete 
File in user hold status 
File is a CP systen duip 
Input file has been opened 
File in systea hold status 
Input file has reached EOF 
SFERIC chain incoiplete 

S*2 Eevice type for spool output 

Use varies according to caller 
Pointer to RECBLOKs for active file 
Filenaae 
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SFBLCK 



Hexadeciiaal Field 
Displacement Naae 



34 


SFBFTYPE 


DS 


CL12 


40 


SFBDATE 


DS 


CL8 


48 


SFBTIME 


DS 


CIS 


50 


SFBLAST 


DS 


1F 


54 


SFBCOPY 


DS 


1H 


56 


SFBCLAS 


DS 


1X S*3 


57 


SFBFLAG2 


DS 


1X S*4 




Bits defined 


in SFBFLAG2 



SFBHOLD EQU X«80' 
SFBHOHLD EQU X»40» 
SFBFLNHT EQD X»20» 



Field Description, Contents, Meaning 

Filetype 

Creation date of spool file 

Creation time of spool file 

DASD location (CCPD) of last page buffer 

Number of copies requested 

Spool file class character 

SFBLCK flag (byte 2) 



Save input file, or hold output file 

Delete input file, or do net hold output file 

File not empty if on 



Hote: SFBHOLD and SFBNOHLD override options in VDEVBLOK. 

Requeue spool file 
Hestart in progress 
Buffer TIC error 
Purge open spool file 
Indicate first page written 
Monitor spool file 

Distribution code 

Overlay name for 3800 is flashing 
S*5 Current starting copy number 
Reserved for IBM use 

K)/8 Size in doutlewords {X»0E») 





SFBHEQOE 


EQD 


X«20» 




SFBRSTRT 


EQU 


XM0» 




SFBTICER 


EQD 


X'08' 




SFBPDRGE 


EQD 


X»04« 




SFBFIRST 


EQU 


X'02« 




SFBMON 


EQU 


X«01' 


58 


SFBDIST 


DS 


CL8 


60 


SFBFLASH 


DS 


CL4 


64 


SFBSTCPY 


DS 


IX 


65 


SFBRS7D 


DS 


XL3 




SFBSIZE 


EQD 


(*-SF 
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SBQBLOK 



SHfiBLOK: SPOOL HOLD fiOEUE BLOCK 



SBQBLOK provides a holding function for identified spool files to prevent output to 
another user or to a real output device. 



I SHQPNT 
I 

8 I 

I 



i S*1 I S*2 I///SHQSPABE///I 



SHQDSEB 



Hexadecinal Field 
Lisplacement Name 



Field Description, Contents, Heaning 

address of next SBQBLOK 

Length 

Oser DSER HOLD flag tyte 

User SYSTEM HOLD flag byte 

liis defined in SHigUHOLD and SBfiSHCLD 

TYPPRT EQO Printer ~See "ippendix A. CP and fiSCS Equate Symbols" 

TYPPDN EQO Punch See "Appendix A. CP and BSCS Equate symbols" 






SHQPNT DS 


1F 




4 


SHQFLAGS DS 


ocLa 




H 


SHQDHOLD DS 


IX 


S*1 


5 


SHQSHOLD DS 


IX 


S*2 



SHQSPARE DS 
SHQDSEB DS 



2X 
CL8 



Reserved for IBB use 

Virtual machine user identification of 
file owner 



SHQBSIZE EQO (*-SHQBLOK) /8 Size in doutlewords <X«02») 
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SHSTAELE 

SBBTABLE; H&MEp-SHARED SEGMENT SYSTEMS TABLE 

SBRTABLE contains pointers to the segment locations of named systems for both the shared 
and nonshared user. This block is used in paging, IPL, and virtual machine assist 
operations- PAGTABLE-8 points to SHRTAELE. 






r"- 


S*1 1 


SHRFPNT 1 


SHRFPNT 


1 


8 






SHRNAME 






10 




SHRTSIZE 1 


SHROSECT 1 


SERSEGCT 




18 


I 


SHRSEGBM 


1 


SEEPAGE 


. .. 1 



Bexadecimal Field 
Displacement Name 



SHRFPNT DS 



1F 



Field Description, Contents, Meaning 
Pointer to next SHETABLE 



4 
8 
10 
12 
14 
18 

1C 



ORG SHRFPNT 
SHRFLAG DS IX 
SHRFPNT DS 3X 

Bits defined in SHRFLAG 



shrnoprt" 


'eqd 


I'H 


SHRBPNT 


DS 


IF 


SHRNAME 


DS 


CL8 


SHRTSIZE 


DS 


1H 


SHROSECT 


DS 


1H 


SHRSEGCT 


DS 


IF 


SHRSEGNM 


DS 


IF 



SHRPAGE DS 



IF 



S*1 Shared segment flag tyte 
Pointer to next SHRTABLE 



Nonprotected shared segments 

Pointer to previous SHRTAELE 

Name of saved system 

Size of SBRTABLE in doublewcrds 

Kusiber of users using this segment name 

Number of shared segments 

Contains shared segment numbers; up to four 

segment numbers per vord 
Pointers to each of the shared page tables. 

There is one word for each shared segment. 

The entry is the same as S*1 SEGPAGE in 

"SEGTAELE: Segment Table." 



Note; In attached processor (AP) mode, there will be two sets of page tables (PAGTAELE) 
for each shared segment; one for the main processor, one for the attached processor. 
SHRPAGE will point to the page tables for the main processor. The page tables for the 
attached processor will be at a fixed displacement <PAGBMP) from these of the main 
processor. 
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SPLIBK 



SPLIHK; SPOOL PAGE BUFFER LINKAGE BLOCK 



SPLINK resides in auxiliary storage and contains one page (4096 bytes) of unit record 
spool inforiation consisting of data and all required CCWs. The HSP¥PAGE field and the 
ESPRPAGE field in RSPLCTL point to SPLISK. 



I 
I 

8 I 

I 

10 I 



SPSXTPAG 



SPPREPAG 



SPRMISC 



SPHECNDH 



Spool Buffer Data Area 
(4032 bytes) » 



FDO 



FD8 



FEO 



FF8 



1 SPCHAR 1 1 
1 1 


1 SPESVD1 1 
1 I 




SPFCBS 


1 


SPCBOD 


1 

1 

■ 


1 SPESVE2 1 


1 




1 S*1 


£♦2 1 SPRSVD3 


1 
1 



Bexadeciaal Field 
risplacenent Naie 



— — "-f — — — ~ — >-. 




SPHXTPAG 


DS 


IF 


n 


SPPREPAG 


DS 


1F 


8 


SPRHISC 


DS 


IF 


C 


SPRECNUH 


DS 


1F 




SPSIZE 


EQD 


(♦-SPLIHK) 






ORG 


SPLIHK*a096-a 


FDO 


SPCHAR 


DS 


CL4 


FD4 


SPRS?D1 


DS 


CL12 


FEO 


SPFCB 


DS 


CL4 


FEa 


SPCMOD 


DS 


cia 


FES 


SPRSVD2 


DS 


CL12 


FF4 


SPFLSHC 


DS 


IX S*1 


FF5 


SPFLAG1 


DS 


IX S*2 



FF6 
FF8 
FFA 



liis de f i ned in SPFLAG1 
SPCOPYFG EQD X»80« 



SPRSVD3 DS 2X 
SPFILID DS 1H 
SPTIME DS CL6 



Field Description, Contents, Heaning 

EASE location (DCHR) of next page buffer 
DASE location (DCHR) of previous page buffer 
Ose varies according to caller 
Number of data records in buffer 

Size in bytes (X»10») 



38CC character arrangement table for file 

Reserved for IBM use 

3800 function control block for file 

3800 copy module for file 

Reserved for IBH use 

3800 flash count 

3800 flag byte 



If flag is set, multiple copies can be done 
in one transmission 

Reserved for IBH use 

File identifier used for verification 

SFETIHE — used for verification 



SPENDSIZ EQD *-SPCHAE 



End-cf-buffer size in bytes 



I iFirst DASD buffer only. All others comprise 1060 bytes 
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SWPTAELE 



SWPTABLE; SHAP TABLE FOB VIRTUAL MACHINE PAGING 

SiPTABLE is used in conjunction with the page table (PAGTABLE) and the segment table 
(SEGTABLE) by the CP page management routines for relating the virtual storage to EASE 
slots and real storage. The PAGSWP field of the PAGTABLE points to SWPTAELE. 



I 



SWPYM 



I S*7 I 



SUPPAG 



8 I S*1 I S*2 I S*3 I S*H I 
I I I I 



SWPCYL I S*5 I S*6 I 
I I 



Hexadecimal Field 
Eisplacement Name 



SWP?M DS 
SWPFLAG2 DS 



1F 
IX 



S*7 



Bits defined in SWPFLAG2 
SWPAPP EQD X«80» 



SiPPAG 



OEG 
DS 



SWPFLAG DS 



SHPFLAG2 
1F 

IX 



S*1 



Bits defined in SWPFLAG 

SnPTRASS EQD X'BQ' 

SWPRECMP EQD X'40« 

SHPALLOC EQD X»20» 

SBPSHR EQD X»10« 

SWPREF1 EQD X»08» 

SiPCHGl EQD X»04« 

SWPREF2 EQD X»02' 

SWPCHG2 EQD X»01» 



9 


SiP¥PAGE DS 


1X 


S*2 


A 


SWPKEYI DS 


1X 


S*3 


B 


SWPKEY2 DS 


IX 


s*a 


C 


SWPCYL DS 


1H 




E 


SWPDPAGE DS 


1X 


S*5 


F 


SWPCODE DS 


1X 


S*6 



Field Description, Contents, Heaning 

Pointer to VMBLCK 
SMap table FLAG2 bits 



Attached processor's shared page table and 
swap table 



Pointer to page table 
Swap table flag bits 



Page in transit 

Page permanently assigned 

Page enqueued for allocation 

Page shared 

First half-page referenced 

First half-page changed 

Second half-page referenced 

Second half-page changed 

Virtual page number within the segment 
Virtual storage key, first 2048 bytes 
Virtual storage key, second 2048 bytes 
EASE cylinder address 
BASE page number on cylinder 
REFVELOK device code 

(The device code is used as an index into 
the list of CP-owned paging volumes pointed 
to by DMKSYSOW) 



Note: For each SWPTABLE there is only one doubleword that consists of SWPVH and SWPPAG 
followed by 16 entries (one for each PAGTAELE entry) that consist of S*1, S*2, S*3, S*4, 
SWPCYL, S*5, and S*6. Thus, the total size of the SWPTABLE is 17 doublewcrds. 
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SYSLOCS 



SYSLOCS: SYSTEM LOW STORAGE INFORMATION BLOCK 



SYSLOCS contains user logon and dial statistics, time/date and log Message data, TOE 
values, and line edit values. 



10 
18 
20 
28 
30 
38 
40 
48 
50 
58 







DMKSYSDT 


1 DMKSYSTM 


1 DMKSYSLW 


1 1 DMKSYSLG 




DMKSYSNM 


1 DHKSYSMA 




DMKSYSMO 


1 DMKSYSND 




DMKSYSLB 


1 DMKSYSDD 




DMKSYSPL 


1 //////////////////////////// 






DMKSYSDW 




1 S*1 1 S*2 1 S*3 1 S*4 


j S*5 




\/////// ////////////// /////////////// 






DMKSYSCK 



Hexadecimal Field 
Displacement Name 





8 

10 



1C 

20 
24 
28 
2C 
30 
34 
38 
3C 
40 



4C 
4D 
4E 
4F 
50 



DMKSYSDT DC 
DMKSYSTM DC 
DMKSYSLi DC 



DMKSYSLG 


DC 


A(0) 




DMKSYSNM 


DC 


F«0« 




DMKSYSMA 


DC 


F«0» 




DMKSYSMO 


DC 


F«0» 




DMKSYSND 


DC 


F»0' 




DMKSYSLB 


DC 


A(0) 




DMKSYSUD 


DC 


A(0) 




DMKSYSPL 


DC 


A(0) 






DC 


A(0) 




DMKSYSDW 


DC 


X»00»,X' 


00», 


DMKSYSLE 


DC 


X»7B' 


S*1 


DMKSYSLD 


DC 


X»4A» 


S*2 


DMKSYSCD 


DC 


X»7C» 


S*3 


DMKSYSES 


DC 


X«7F» 


S*4 


DMKSYSLL 


DC 


AL1(130- 


129,7 



Field Description, Contents, Meaning 

CL8«MM/DD/YY» Date of system log message 
CL8*HH:MM:SS* Time of system log message 
X»00»,X»00«,CL10» » 

Weekday of system log messages 

Pointer to first log message block 
Current numter of users on the system 
Maximum numter of users allowed en the system 
Maximum number of users on the system 
Number of dialed users on the system 
Pointer to user directory lock block 
Pointer to start of user directory on SYSBES 
Pointer to a list of virtual page buffers 
Reserved for IBM use 
CLIO' 

Day of week in hexadecimal and EBCDIC 

Terminal line-end symbol 
Terminal line-delete symbol 
Terminal character-delete symbol 
Terminal escape symbol 
2,80) 
S*5 Default line lengths for 3210 and 3215 - 
2741 and 1050 - 3270 and 3066 terminals 



53 
58 



DC 
DMKSYSCK DC 



XL5'0' 
D»0» 



Reserved for IBM use 

TOD clock value last stored by 

accounting, DDMP, or machine check 
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SYSTEL 

SYSTEL: MM^ SYS TEM TABLE 

SYSTEL contains the system and DASD informaticn required tc load a saued system by name. 
SYSTEL is built during system generation in DMKSHT using the NAHESYS macro. 



r 


SYSPNT 1 


SYSSIZE 




1 SYSNAME 




VSYSRES 


1 


SYSVADDB 




SYSVOL 


1 


SYSCYL 




SYSSTART 1 


SiSFAGCT 






SYSPAGLN |/S*VI S*2 | 

J 







10 



18 



20 



28 



SYSPAGNM 
(Variable Length) 



SYSSEGLN I 
J 



SYSHRSEG 



(Variable Length) 



Hexadecimal Field 
Eisplacement Name 






SYSPNT 


DS 


IF 


u 


SYSSIZE 


DS 


IF 


8 


SYSNAME 


DS 


CL8 


10 


VSYSRES 


DS 


CL6 


16 


SYSVAEDS 


DS 


1H 


18 


SYSVOL 


DS 


CL6 



IE 



SYSCYL 



DS 



1H 



20 


SYSSTART DS 


IF 




24 


SYSPAGCT DS 


IF 




28 


SYSPAGLN DS 


1H 




2A 


DS 


IX 


S*1 


2B 


SYSFLAG DS 


IX 


S*2 



Field Description, Contents, Meaning 

Chain pointer tc next entry 

Minimum storage size needed tc run system 

System name 

Volume identification number of DASD 

containing user's system 
Virtual address of VSYSRES 
Volume identification number of DASD 

containing saved pages 
Cylinder on VSYSRES of user's system. Same 

as VDEVRELN 
CCPD of first page on SYSVOL 
Total number of pages saved 
Number of entries in SYSPAGNM 
Reserved for IBM use 
Named system flag 



Bits defined in S YSFL AG 
SYSPHOT EQD X»80' 



SYSPAGNM DS 

SYSSEGLN DS 
SYSHRSEG DS 



IF 

1H 
IX 



Dnprctected shared segments 

One fullword entry for each range of pages 

to be saved 
Numbers of entries in SYSHRSEG 
One byte for each segment to be shared 
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TNSREC 

OSREC: "T" TYPE RECORD FORMAT (ENVIRON MEHTAL RECORDING) 

TNSREC is used by DHKIOE to record aiscellaneous data records on CP»s I/O error recording 
cylinders.. The record contains sense data applicable to a specific I/C device. 





8 

10 

18 

20 



TNSKEYN I T*1 |/T*2//|/T*3/!/'[* 4/ I///TNSSPE 1/////// 



TNSDTEN 



I TNSTMEN 



TNSCPIDN 



TNSDEVAD 



TNSVOLID 



Sense Data 



(Variable Length) 



Hexadecimal Field 
Eisplaceoent Name 





24-Byte 


jeader 


Record 







TNSKEYN 


DS 


1H 




2 


TNSSWS1 


DS 


IX 


T*1 


3 


TNSSWS2 


DS 


IX 


T*2 


H 


TNSSWS3 


DS 


IX 


T*3 


5 


TNSRECNT 


DS 


IX 


1*H 


6 


TNSSPE1 


DS 


1H 




8 


TNSDTEN 


DS 


IF 




C 


TNSTHEN 


DS 


IF 




10 


TNSCPIDN 


DS 


2F 





Field Description, Contents, fieaning 



Class source 90=T type N/S NCN TPER 

Switch byte 

Reserved for IBB use 

Reserved for lEM use 

Reserved for IBH use 

Reserved for IBH use 

Date 

Tiie 

Processor identification and aodel number 



JnJ 2i 2 4 -Bite Header 
Devicg Dependent Data 



18 


.TNSDEVAD 


DS 


1H 


1A 


TNSVOLID 


DS 


6X 


20 


TNSSNS1 


DS 


24X 


38 


TNSSNS2 


DS 


24X 


50 


TNSSNS3 


DS 


24X 


68 


TNSSNS4 


DS 


24X 


80 


TNSSNS5 


DS 


24X 


98 


TNSSNS6 


DS 


24X 


BO 


TNSSNS7 


DS 


24X 



Device address request is pending 

Vclune identification number 

24 Sense bytes 

24 Additional sense bytes 

24 Additional sense bytes 

24 Additional sense bytes 

24 Additional sense bytes 

24 Additional sense bytes 

Last 24 sense bytes 
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TREXT 

TEEXT: VIRTUAL MACHINE TRACING EXTENSION TO VagLCK 

TREXT facilitates the tracing of virtual machine program instructions and interrupts. 
This block is used whenever the CP TRACE command is invoked. The VMTHEXT field of the 
VBELOK points to TREXT 



10 



18 



20 



28 



1 TREXIN1 1 TEEXIN2 | 


1 TREXSVC1 1 TREXSVC2 | T*1 | T*2 | TREXLOCK 1 


1 TREXPERA 1 TREXEERC | TREXLCNT | 


1 TREXANSI 1 TREXCR9 i 


1 TREXCRIO 1 TREXCR11 \ 


1 TREXEUFE | 
1 (10 doufclewords) I 

1 . J 



Hexadecimal Field 
Eisplacement Name 






TREXINI 


ES 


IF 


4 


TREXIN2 


DS 


IF 


8 


TREXSVC1 


DS 


IB 


A 


TREXSVC2 


ES 
ORG 


1H 
TR 





TREXPSH 


DS 


ID 


8 


TREXINTL 


ES 


1H 


A 


TREXINTC 


ES 


1H 



TREXFLAG DS 



IX 



Field Description, Contents, Meaning 

First address - replaced instruction 
Second address - replaced instruction 
Displaced halfword - instruction 1 
Displaced halfword - instruction 2 



Old ESW for pending SVC interrupt 

Instruction length code 

Interrupt cede for pending interrupt 

T*1 Tracing control flags 



Bits defined in TREXFLAG 
TREXRDN EQD X*80' 
TREXVAT EQD X«40' 
TREXNDSP EQD X»20» 



Prevent CFWAIT between events 

Call DMKVATRN to put back virtual instruction 

DSP should not call TRCIT 



TREXODT DS 



IX 



T*2 Trace output controls 



Bits defined in TREXODT 
TREXPRT EQD X'80» 
TREXCON EQD X'40' 



Output to the virtual spool printer 
Output to user virtual machine terminal 



E 


TREXLOCK DS 


1H 


10 


TREXPERA DS 


IF 




ORG 


TREXPERA 


10 


TREXNSI DS 


6X 


14 


TREXPERC DS 


1H 


16 


TREXLCNT ES 


1H 


18 


TREXANSI DS 


1A 



Indicates tracing when set 

Address of instruction causing PER interrupt 

Redefinition for TRACE use 

Actual next (or last) seguential instruction 

PER code to be reflected 
Printed output line count 
Address of next (or last) seguential 
instruction 
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TREXT 



Hexadecimal 


Field 






Eisplacement 


Name 






1C 


TREXCR9 


DS 


OF 






ORG 


TREXCR9 


1C 


TREXCTL 


DS 


OH 




TREXCTL1 


DS 


IX 


ID 


TREXCTL2 


DS 


IX 



Bits defined in TREXCTL2 
TREXCCW ~EQD X»80« 
TREXCSW EQD X»40' 
TREXBRAN EQD X«20» 
TREXINST EQD XMO' 



1C 


TREXPER 


DS 


XL 2 


1E 


TREXPREG 


DS 


1H 


20 


TREXCR10 


DS 


1F 


IE 


TREXPRNT 


DS 


1H 


20 


TREXTERM 


DS 


1H 


22 


TREXRONF 


DS 


1H 


24 


TREXPNTR 


DS 


1F 


24 


TREXCR11 


DS 


IF 


28 


TREXBDFF 


DS 


10D 




TREXSIZE 


EQD 


(♦-TREXT) /B 



Field Description, Contents, Meaning 

Shadow control registers for PEE trace 

Redefinition for TRACE use 
Halfwcrd holding tracing control bits: 
First byte = same as VHTECTL in VMBLOK 
Second byte = remaining control bits 



Trace virtual and real CCWs 
Trace virtual and real CSHs 
Trace successful branches 
Trace all instructions 

PER control field 

PER register mask field 

Address range starting value 

Printer flag bits corresponding to TREXCTL 

Terminal flag bits corresponding to 

TREXCTL 
Run/ncrun flag bits corresponding to 

TREXCTL 
Pointer to first stacked TRACE reguest, if 

any 

Address range ending value 
Console/printer output buffer (80 bytes) 

TREXT size in dcublewords (X»0F«) 
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TBCELOK 



TB^LOK: TOD CLOCK CO HP ABATOR REDDEST 



TRQBLOK manages the timing facilities of VM/370 



10 



18 



20 



r 




TRQBYAL 




1 

1 
1 




TRQBFPNT 


1 


TRQEBPNT 


1 

1 


1 TRQBTOD 1 
1 I 




TBQBDSEB 


1 


TRQEIRA 


1 

1 
1 


1 




TRQEQOE 




1 

1 
1 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 

TOD clock comparator value for interrupt 
Pointer to next TRQBLOK 
Pointer to previous TRQBLOK 
TOD clock value when TRQBLOK is gueued 
Address of 7MBL0K for user 
Interrupt return address 
Time left in queue; tracking virtual 
processor timer 

TRQBSIZE EQD (*-TRQBL0K) /8 Size in doutlewords (X»05») 






TRQBVAL DS 


ID 


8 


TRQBFPNT DS 


IF 


C 


TRQBBPNT DS 


IF 


10 


TRQBTOD DS 


ID 


18 


TRQBDSER DS 


IF 


1C 


TRQBIRA DS 


IF 


20 


TRQBQOE DS 


ID 



• Local Graphic Device Support 

The following continuation of the TRQBLOK DSECT for local graphic device support is 
tuilt, referenced, and released by DMKGRF. 



28 I 



TRQBCRT 



TRQEDbv 



j T*1 



I H'^A 



Hexadecimal Field 
Displacement Name 



28 


TRQBCRT 


DS 


IF 


2C 


TRQBDEV 


DS 


1H 


2E 


TRQBFLAG 


DS 


IX 




Bits def 


ined 


in TR^BF 




CRTFMT 


EQU 


X»80« 




CRTDIAG 


EQU 


X'40« 




CRTALRM 


EQO 


X»20» 




CRTiNG 


EQO 


XMO' 




CRTCARD 


EQU 


X«08» 




CRTTAB2 


EQD 


X«04> 




CRTAPL 


EQD 


X«02' 




CRTSIO 


EQO 


X'01» 




CRTAIO 


EQU 


CRTSIO 


2F 


TRQBLINE 


DS 


IX 



Field Description, Contents, Meaning 

Graphic device return IRA 
Graphic device device address 
T*1 Graphic device flags 



Screen formatted VM/370 online 

Screen written with Diagnose 

Screen has alarm message 

Screen has MORE... warning 

Data from card reader 

Second pass flag for tab function 

APL read buffer allocated 

Dser issue Diagnose to input area 

Timer interrupt pending after I/O completes 

T*2 Line coordinate for input area 
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TBQBLOK, DDEFELOK 



I • Remote Graphic Device Support 



The following continuation of the TRQBLOK DSICT for remote graphic device support is 
built, referenced, and released by DMKRGA and DKKRGE. 



28 I 



TRQBCRT 



I TBCEDEV I TRQNfiME | 



Hexadecimal Field 
Displacement Name 



28 
2C 

2E 



TRQBCRT DS IF 

TRQBDEV DS 1H 

TRQNAME DS 1H 

TRQBPOLL EQO X»FF» 



Field Description, Contents, Meaning 

Graphic device return IRi 
Graphic device line address 
Resource identification 
Timer interrupt for general poll 



OEEFELOK: USER DIRECTORY BUFFER BLOCK 

DEEFELOK is used as a buffer for user device block data in user directory access 
operations. 



I 



ODBFWORK 



38 I 



Hexadecimal Field 
Displacement Name 



DDBFVADD 




38 
3C 



UDBFWORK DS 
DDBFVADD DS 
ODBFDASD DS 



7D 
IF 
1F 



ODEFDASD 



Field Description, Contents, Meaning 

Buffer work space used by the caller 
Virtual address of the last directory page 
DASD address of the last directory page 



DDBFSIZE EQD (*-ODBFBLOK) /8 UDBFELOK size in doublewords (X'08») 
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DDEVBLCK 

DEEYELOK; USEE DEVICE BLOCK 

DEEVBLOK supplies the information about the virtual machine's virtual devices, the 
operational parameters for its use, such as Dfisr access passwords, read/write link mode, 
spool device, T-disk space versus dedicated device space, as well as other parameters. 



10 



18 



20 



28 



1 


UDEVAED 


0DE7DISP 1 DBEVDASE 




- "1 




0*1 1 D*2 


1 0*3 1 0*4 1 0*5 1 0*6 I 


ODEVUCYL 






DDEVRELN 


OEIVVSEE 




1 


1 DDEVPASR 1 


1 DDSvPASh ! 


L 




ODSVPASM 




1 

J 



Hexadecimal Field 
Eisplacement Name 



ODEVADD BS 
DDEVDISP ES 
ODEVDASD DS 
ODEVSTAT BS 



1H 
1H 
IF 
IX 



0*1 



Field Description, Contents, Heaning 

Virtual device address 
Eisplacement of the next block 
EASE address of the next block 
Bevice status information 



liis defined in OBEVSTAT 
ODEVBEB ~EQO X«80' 
OBEVTDSK EQO X*40» 
ODEVLONG EQO X«20« 



OBEVLKDV 


EQO 


XMO» 


OBEVSPOO 


EQO 


X»08» 


0BEV3158 


EQO 


X»OU» 


OBEVVRR 


EQO 


X«02» 



Bevice to be dedicated to this user 

T-disk to be allocated 

Bevice block is full length (6 doublewords) 

Bevice is to be linked (at logon) 

Bevice is a spool device 

Bevice is a 3158 console 

Virtual reserve/release requested 



ODEVMOBE BS 



IX 



0*2 Access mode information 



Bits defined in ODEVMOBE 



OBEVLR 


EQO 


X»80' 


OBEVLW 


EQO 


X'UC 


OBEVLM 


EQO 


X»20' 


ODEVR 


EQO 


00 


ODEVRR 


EQO 


04 


ODEVW 


EQO 


08 


ODEVWR 


EQO 


12 


OBEVH 


EQO 


16 


DEEVMR 


EQO 


20 


ODEVMW 


EQO 


24 



Read links allowed 
Write links allowed 
Multiple write links allowed 
Bevice to be in R link mode for owner 
Bevice to be in RR link mode for owner 
Bevice to be in W link mode for owner 
Bevice to be in WR link mode for owner 
Bevice to be in M link mode for owner 
Bevice to be in HR link mode for owner 
Device to be in KW link mode for owner 



ODEVTYPC BS 1C 

ODEVTYPE ES 1C 

ODEVFTR ES 1C 

ODEVMDL BS 1C 



0*3 Virtual device class 

0*4 Virtual device type 

0*5 Device feature codes 

0*6 Bevice model number 



B 

E 

10 



ORG 
ODEVCLAS BS 
ODEVLINK DS 
DDEVLKID DS 



ODEVMDL 

1C 

1H 

ID 



Oser device block (short) 
Spool device output class 
Oser link tc disk 
Oser link tc userid 



E 
10 
12 



ODEVNCYL DS 
OBEVRELN DS 
ODEVVSER DS 



1H 
1H 
6C 



Virtual DASD size 

Virtual BASE cylinder relocation 

Volume identification number 
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UEEVELOK, DDIRBLOK 



Hexadeciaal Field 
Eisplacement Name 



18 

20 
28 



UDEVPASR DS 
ODEVPASH DS 
ODEVPASM BS 



1D 
1D 
ID 



Field Description, Contents, Meaning 

Password for read access 
Password for write access 
Password for nmltiple access 



DDEVSIZE EQO (*-DDE7BL0K) /8 DDEVELOK size in doutlewords (X»06') 



UEIBELOK; USER DIRECTORY BLOCK 

DEIRELOK contains data describing the user's coimand privilege classes, special virtual 
machine options, terminal line edit values, and ether values. 



I//DDIRRSV1///I UDIRDISP | 



8 



10 



ODIRDASE 



ODIRDSER 



DDIRPASS 



Hexadecimal Field 
Displacement Name 




2 

^ 

8 
10 



ODIRRSVI DS 
ODIRDISP DS 
UDIRDASD DS 
ODIROSER DS 
DDIRPASS DS 



1H 
IB 
IF 
ID 
ID 



Field Description, Contents, Heaning 

Reserved for IBM use 

Displacement of the user's DMACELOK 

EASE address of the user's OMACELCK 

Oserid 

Oser password 



UDIRSIZE EQD (*-ODIRBLOK) /8 DDIBELOK size in doutlewords (X'03') 
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DMACBLCK 
DHaCELOK; USEB MACHINE BLOCK 

DHACELOK contains the logon parameters for one virtual aachine user. This blcclc provides, 
in addition to the linkage to the user's defined virtual machine device ODEVELOK, the 
command privilege class, assigned line edit values, as well as other virtual machine 
options. 



DMACDVCT I DMACDISP | 



DMACEASD 



8 
10 
18 
20 
28 



D*1 I U*2 I 0*3 I 0*4 I 0*5 | 0*6 | 0*7 | 0*8 



OMACCORE 



OHSCMCOB 



UMAcAlCT 



OMACDIST 



OMACIPL 



30 I OMACPOID 
I 



I D*9 I/////////0MACHS72/////////// 



Hexadecimal Field 
Eisplacement Name 



OMACDVCT ES 
OMACDISP DS 
OMACBASD DS 
OMACCLEV DS 



1H 
1H 
IF 
1C 



0*1 



Field Description, Contents, Heaning 

Number of devices 
Displacement of the next block 
EASE address of the next block 
Command level flags 



Bits defined in OMACCLEV 
OMACCLA EQO X«80» 
OMACCLB EQO X'40' 
OHACCLC EQO X»20' 
OMACCLD EQO XMO' 
OMACCLE EQO X'08' 



UMACCLF EQO 



OMACCLG 
DMACCLH 



EQO 
EQO 



x*oa» 

X'02« 
X'01» 



Privilege 
Privilege 
Privilege 
Privilege 
Privilege 
Privilege 
Privilege 
Privilege 



Class 
Class 
Class 
Class 
Class 
Class 
Class 
Class 



A funct 
B funct 
C funct 
D funct 
E funct 
F funct 
G funct 
H funct 



ions 
ions 
ions 
ions 
ions 
ions 
ions 
ions 



OMACPRIR DS 
OMACOPT DS 



IX 
IX 



0*2 Virtual machine priority 
0*3 Virtual machine option flags 



Bits defined in OMACOPT 

DMACISAM EQO X»80» 

OMACECOP EQO X»40* 

OMACRT EQO X»20» 

OMACVROP EQO XMO» 

OMACACC EQO X*08» 

OMACRSVU EQO X'04' 

OMACNSVC EQO X»02» 

OMACBMX EQO X»01» 



ISAM CCW checking option 

Extended control mode option 

Real timer option 

Virtual = Real storage option 

Accounting card option 

Reserved for IBM use 

SVCs not handled by virtual machine assist 

feature 
Virtual block multiplexer channel 
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UMACBLOK 



Hexadecimal 
Displacement 



Field 
Name 



34 



UMAC0PT2 DS 



1C 



Bits defined in 0MAC0PT2 
DMACCPU EQD X'80' 

DMACVMSV EQD XMO' 



c 


DMACLEND 


DS 


1C 


0*5 


Termin 


D 


OMACLDEL 


DS 


1C 


0*6 


Termin 


E 


OMACCDEL 


DS 


1C 


0*7 


Termin 


F 


UMACES 


DS 


1C 


0*8 


Edit e; 


10 


OMACCORE 


DS 


IF 




Virtua 


m 


DMACMCOR 


DS 


IF 




Haximu 


18 


UMACACCT 


DS 


ID 




Accoun 


20 


DMACDIST 


DS 


ID 




Dser m 


28 


UMACIPL 


DS 


ID 




Name c 


30 


DMACPDID 


DS 


XL3 




Frcces 
in t 


33 


OMACAFF 


DS 


IX 


0*9 


Affini 




5i£§ ^SliS®^ 


in OMACAFF 







OMACFFON EQO X»ttO» 
OHACFFAD DS 0BL6 



OMACRSVR DS 



IF 



Field Description, Contents, Feaning 
0*4 Virtual machine option flags 



Processor identification number on option 

statement 
VMSAVE on option statement 



al line end symbol 

al line delete symbol 

al character delete symbol 

scape symbol 

1 storage size in bytes 

K virtual storage size in bytes 

ting information 

achine distribution information 

f system to be IPLed at logon 

sor identification number 

inary 

ty and processor address 



Affinity specified 

Processor address for affinity 

Reserved for IBM use 



OMACSIZE EQO (*-DHACBLOK) /8 DMACELOK size in doublewords (X»06') 
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Virtual I/O Control Blocks 



The base fcr locating the I/O 
structure is the user's Virtual M 
Control Block (VMBLOK) . The 
contains a pointer to the start of 
control block tables, and a table 
channel indexes. The control block 
contain one block for each of the v 
channels, control units, and device 
are defined for the user's virtual na 
The entries in the channel index 
(VMCHTBL) contain the pointers to 



^h^r^r^a^\ Aaf- 



■F/->1- 4->ii 



HOOT" "i-n i-\\i 



block 
achine 
VMBLOK 
three 
of 16 
tables 
irtual 
s that 
chine, 
table 
each 
Jiiannei detmea tor tiie user xn tiie table 
of virtual Channel Blocks (VCHBLOKs) . Each 
VCHBLOK contains a table of pointers that 
point to the Virtual Control Unit Blocks 
(VCUELOKs) for the control units attached 
to that virtual channel. Each VCDBLOK 
contains pointers to the Virtual Device 
Blocks (VDEVBLOK) attached to the control 
unit. 

Thus, if given the unit address of any 
component in the form cuu, the appropriate 
control blocks representing each component 
in the subchannel path to the given unit is 
located via the indexing scheme. 



VIRTUAL CHANNEL BLOCKS 



There is 
(VCHBLOK) 
connected to 
Each VCHBLOK 
and flag 
(selector, 
multiplexer) 
and its att 
several stat 



one Virtual Cha 

for each virtu 

the user's virtua 

contains the cha 

indicating the c 

byte multiplexer. 

The status of 

ached units are re 

us and mask bytes. 



nnel Block 
al channel 
1 processor, 
nnel address 
hannel type 
or block 
the channel 
presented by 



A status byte (VCHSTAT) indicates 
whether the channel is busy or has a 
channel class interrupt pending. 

A halfword unit address identifies the 
unit causing the channel-class interrupt 
(if it is present) . 

A halfword mask (VCHCDINT) contains a 
bit map of the attached control units 
that have interrupt status pending. 



Following these status flags and masks 
is the table of indexes pointing to the 
attached VCDELCKs; index entries 
representing addresses at which no control 
unit is attached have a value of -1. 



VIETUAL CCNTECL DNIT BLOCKS 



There is one Virtual Control Unit Block 
(VCDBLOK) for each control unit in the 
virtual configuration. These blocks are 
arranged in a table, each contains: in 
addition to its base address, status flags 
similar to those in the VCHBLOK and a table 
of indexes to attached VDEVBLOKs. The 
status flags defined for the VCOBLCK differ 
from those for the VCBELCK ,in that they can 
contain status for the control unit and 
also for a subchannel. 

For example, if the VCDBLOK representing 
a 2803 tape control unit is attached to a 
virtual selector channel, both the VCHBLOK 
and the VCDBLOK are marked busy. However, 
if the VCUBLOK is attached to a virtual 
byte multiplexer channel and is for a 
control unit on a selector subchannel of 
the multiplexer, the busy status of the 
channel is reflected in the VCDBLOK only. 
Thus, the virtual byte multiplexer appears 
nonbusy to operations on other, nonshared 
subchannels. 



VIETDAL DEVICE BLOCKS 



There is o 
(VEEVBLOK) in 
virtual device 
VEEVBLOK conta 
unit address, 
virtual CSH fo 
the device, 
contains devic 
that allows 
simulation r 
channel progra 



ne Virtu 

the conf 

defined 

ins the de 
device 

r the last 
In addit 

e type sp 
the I/O 

outines t 

ms present 



al Device Block 

iguration for each 

by the user. Each 

vice portion of the 

status, and the 

interrupt taken by 

ion, the VDEVELCK 

ecific information 

translation and 

c interpret the 

ed by the user. 



Note: The VCHBLCK, VCDBLOK, VDEVBLCK, 
VECBBLOK, and VSPXBLOK DSECTs are all 
contained in the VELOKs COPY file. 
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VCHBLOK 



VCHBLOK: VIRTUAL CHANNEL BLOCK 



VCHBLOK contains information providing linkage between the virtual machine and one of its 
virtual channels. Supplied in this block, in addition to channel status and type 
information, are the reflected interrupts from attached virtual control units. The 
VHCHSTRT field of the VBBLOK points to the first VCHBLOK. 



I 

I 

8 I 



VCHADD 



VCHCUINT I VCHCEEEV | V*1 | V*2 



VCHCDTBL 



Hexadecimal Field 
Eisplacement Name 






VCHADD DS 


1H 


2 


VCHCDINT DS 


1H 


4 


VCHCEDEV DS 


1H 


6 


VCHSTAT BS 


IX 




Bits defined 


in VCHSTAT 




VCHBUSY EQU 


X'80« 




VCHCEPND EQO 


X»40» 




VCBDED EQU 


X»OT* 


7 


VCHTYPE DS 


1X 




liis defined 


in VCHTYPE 



VCHSEL EQU X»80« 
VCHBMX EQO X'40» 



VCHCDTBL DS 
VCHSIZE EQD 



16H 
(♦-VCHBLOK) /8 



Field Description, Contents, Heaning 

Virtual channel address 
VCDELOK with interrupt-bit map 
Virtual device address with channel class 
interrupt 
V*1 Virtual channel status 



Virtual channel busy 

Virtual channel class interrupt pending 

Virtual channel dedicated 

V*2 Virtual channel type 



Virtual selector channel 
Virtual block multiplexer 

Control units attached - VMCUSTRT index 

VCHBLOK size in doublewords (X'05») 
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VCONCTL 



VCONCTL: VIRTUAL CONSOLE CONTROL BLOCK 



VCONCTL contains CCW and data buffer information for the communications of 
console. The VDEVCON field of the VDEVBLOK points to VCONCTL. 



the virtual 



1 VCONCAW 1 


VCOHBDF 


1 VCONCCW 


|/V*V/I V*2 |/V*3//|/ V*V/I 


VCOBIDAP 


1 VCONRBDF 1 


VCCNRCNT 1 V*5 |//V*6// 



10 



18 



ZU I 



VCONWBUP 



! VCCNWCNT ! V*7 |//V*8// 



Hexadecimal Field 
Eisplacement Name 



VCONCAW DS 
VCONBDF DS 
VCONCCH DS 



1F 
IF 
ID 



Field Description, Contents, Meaning 

Virtual address of user CCB 
pointer to data buffer 
Current user CCW 



VCONADDR 
VCONFLAG 
VCONDWC 
VCONCNT 



ORG 

DS 

DS 

DS 

DS 



VCONCCH 

IF 

1X 

IX 

1H 



CCiJ data address 
CCW flag bits 
Diagnose write control 
CCW byte count 



VCONCOHD 



ORG 
DS 



VCONADDR 
IX 



CCW command code 



10 
11 
12 
13 
14 

18 
1C 
IE 
IF 
20 
24 
26 
27 



VC0NRSV1 
VCONBFSZ 
VC0NRSV2 
VC0NRSV3 
VCONIDAP 

VCONRBDF 
VCONRCNT 
VCONRBSZ 
VC0NRSV6 
VCONWBUF 
VCONWCNT 
VCONWBSZ 
VC0NRSV8 



DS 
DS 
DS 
DS 
DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 
DS 



IX 
IX 
IX 
IX 
IF 

IF 
1H 
IX 
IX 
IF 
1H 
IX 
IX 



V*1 
V*2 
V*3 
V*4 



V*5 
V*6 



V*7 
V*8 



Reserved for IBM use 

Data buffer size in doublewords 

Reserved for IBH use 

Reserved for IBB use 

For indirect data addressing pointer 

to current IDAW 
Address of read data buffer 
Data count in read buffer 
Read buffer size in doublewcrds 
Reserved for IBM use 
Address of write data buffer 
Data count in write buffer 
Write buffer size in doublewords 
Reserved for IBM use 



VCONSIZE EQD (*-VCONCTL) /8 VCONCTL size in doublewords (X'05») 
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VCOBLOK 



VCUBLOK: VIETDAL CONTROL ONIT BLOCK 



7CUBL0K contains status information relating to the virtual channel, and the status and 
features of the virtual control unit. The VHCDSTHT field of the 7HELCK points to the 
first VCUBLOK. 



I VCOADD 
I 

8 I 



I VCODVINT I VCDIBTS ( 7*1 | V*2 



VCUDVTBL 



Hexadecimal Field 
Eisplacement Name 






VCDADD DS 


1H 


2 


VCODVINT DS 


1H 


4 


VCDINTS DS 


1H 


6 


VCDSTAT DS 


1X 




Bits defined 
VCDCHBSY EQD 


in VCOSTAT 
X«80« 




VCDCEPND EQD 


X»40» 




VCOBDSY EQO 


X»20* 




VCDPEND EQU 


X»10» 




VCOCOEPN EQO 


X»08' 




VCOACTV EQO 


X'04» 



VCDTYPE DS 



IX 



Bits defined in VCDTYPE 
VCOSHRD EQO X»80» 
VCOCTCA EQD X'UO' 



Field Description, Contents, Meaning 

Virtual control unit address 
VDEVELOK with interrupt - bit map 
Virtual control unit interrupt status 
V*1 Virtual control unit status 



Virtual subchannel busy 

Interrupt pending in subchannel 

Virtual control unit busy 

Virtual control unit interrupt pending 

Virtual ccntrdl unit end pending 

Virtual control unit active 

V*2 Virtual control unit type 



Virtual control unit on shared subchannel 
Virtual control unit is a channel-to-channel 
adapter 



VCDDVTBL DS 16H 

VCOSIZE EQD (*-VC0BL0K)/8 



Devices attached - VMDVSTRT index 
VCDELCK size in doublewords (X»C5») 
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VEEVBLOK: VIRTUAL DEVICE BLOCK 



VDEVBLCK 



VEEVBLOK maintains status and interrupt conditions 
field of the VMBLOK points to the first VDEVBLCK. 



for one virtual device. The VMDVSTET 



10 
18 
2G 
28 
30 
38 



r— 


VDEVAED 1 VDEVINTS I 


V*1 


1 V*2 1 V*3 


V*4 






VDEVCSW 












VDEVRELN | VDEVBND | 




VDEVPCSN 








VDEVQOED 1 




VDEVOEER 








VDEVLINK 1 




VDEVREAL 








VDEVIOCT 1 




VDEVDSER 








VDEVIOER 1 




VDEVICB 






I— 


V*5 I/////VDEVRES1/////I 




VDEVRRE 







Hexadecimal Field 
Eisplacement Name 



VDEVADD DS 
VDEVINTS ES 
VDEVTYPC DS 
VDEVTYPE DS 
VDEVSTAT DS 



1H 




1H 




IX 


V*1 


IX 


V*2 


IX 


V*3 



Field Description, Contents, I!eaning 

Virtual device address 
Virtual device interrupt status 
Virtual device type class 
Virtual device type 
Virtual device status 



Siis defined in VDEVSTAT 

VDEVCHBS EQD X»80« 

VDEVCHAN EQD X»40» 

VDEVBOSY EQO X«20' 

VDEVPEND EQD X«10» 

VDEVCDE EQD X'08' 

VDEVNRDY EQD X»04» 

VDEVCATT EQD X»02» 

VDEVDED EQD X»01» 

VDEVFLAG DS IX 



Virtual subchannel busy 

Virtual channel interrupt pending 

Virtual device busy 

Virtual device interrupt pending 

Virtual control unit end 

Virtual device not ready 

Virtual device attached by console function 

VDEVBEAL is dedicated device RDEVBLOK 

V*4 Virtual device flags 



Bits defined 


in VDEVFLAG 




VDEVRDO 


EQO 


X'80» 


DASD 


VDEVENAB 


EQD 


X»80' 


Virtu 


VDEVTDSK 


EQD 


X»40» 


DASE 


VDEVDIAL 


EQD 


X»40» 


Virtu 


VDEVCSPL 


EQD 


X«40' 


Ccnsc 


VDEV231T 


EQD 


X»20» 


DASE 


VDEV231B 


EQD 


X'10» 


DASD 


VDEVCCWI 


EQD 


XMO' 


Consc 


VDEVSAS 


EQD 


X'08» 


DASE 


VDEVDLY 


EQD 


X»08» 


Ccnsc 


VDEVDET 


EQD 


X'04' 


Virtu 


VDEVPOST 


EQD 


X»02» 


Prese 


VDEVRSRL 


EQD 


X»02» 


Reser 


VDEVDC 


EQD 


X»01« 


Virtu 



- read-only 
al 270x - line 

- T-disk space 
al 270x - line 
le - activity s 

- 2311 simulate 

- 2311 simulate 
le and spooling 

- Executing sta 
le - delay spoo 
al device is be 
nt attention wi 
ve/release are 
al device sense 



enabled 

allocated by CP 

connected 

pooled 

d on top half of 231U 

d on bottom half of 2314 

- processing first CCi 
ndalone seek 
ling 

ing detached 
th a single interrupt 
valid CCH operation codes 

bytes present 
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YEEVELOK 



Hexadecimal 


Field 






Eisplacement 


Name 






8 


VDEVCSW 


DS 


ID 


10 


VDEVRELN 


DS 


1H 


12 


VDEVBND 


DS 


1H 


14 


VDEVPOSN 


DS 


IF 


18 


VDEVQDED 


DS 


IF 


1C 


VDEVOPER 


DS 


IF 


20 


VDEVLINK 


DS 


IF 






ORG 


VDEVLINK 


20 


VDEVTMAT 


DS 


1F 


24 


VDEVREAL 


DS 


IF 


28 


VDEVIOCT 


DS 


IF 


2C 


VDEVDSER 


DS 


IF 


30 


VDEVIOER 


DS 


IF 






ORG 


VDEVIOER 


30 


VDEVSNSE 


DS 


IF 


34 


VDEVFCBK 


DS 


IF 


34 


VDEVIOB 


DS 


IF 


38 


VDEVFLG2 


DS 


IX 




Bits def j 


Lned 


in VDEVFLG2 




VDE7RRF 


"eqd 


X»80» 




VDEVRES 


EQO 


X»40' 




VDEVODE 


EQD 


X»20» 




VDEVCPEX 


EQD 


XMO' 




VIRTDftL 


EQO 


X » 1 » 


39 


VDEVRESI 


DS 


3X 


3C 


VDEVRRB 


DS 


IF 



Field Description, Contents, Meaning 

Virtual channel status word 

Virtual DASE cylinder relocation 

Virtual EASE size (in cylinders) 

Virtual EASE seek position 

Virtual SIO to real SIO queued time 

Device operational time 

Link to virtual shared devices 



T-disk attached time (TOD clock word 0) 

Pointer to real device RDEVELCK 
Virtual device I/O count 
Pointer to VMBLOK of VDEVBLCK owner 
Pointer to lOERELOK for last error 



Sense bytes for spool device 

Address of forms control block (VFCBELOK) 

Pointer to active lOELOK 
V*5 Virtual device flag byte 2 



Process virtual RESERVE/RELEASE commands 
Minidisk reserved by VDEVDSER 
VDEVELOK to get device when minidisk 

is released 
Virtual I/O waiting for release of 

minidisk 
Virtual device is known by the virtual 

machine as a 3330V 

Reserved for IBM use 

Address of VRRBLOK for RESERVE/RELEASE 

VDEVSIZE EQD (*-VDEVBLOK) /8 VDEVELOK size in dpublewords (X'07») 



i.9E Spoplinq/Conscle Devices 
ORG VDEVRELN 



10 
14 
18 
1C 
20 
21 
22 
24 
26 



VDEVEXTN 


DS 


IF 


VDEVSPAR 


DS 


IF 


VDEVCON 


DS 


IF 


VDEVSPL 


DS 


IF 


VDEVCLAS 


DS 


1C 


VDEVKEY 


DS 


IX 


VDEVDNIT 


BS 


1H 


VDEVCOPY 


DS 


1H 


VDEVCFLG 


DS 


IX 



iii§ defined in VDEVCFLG 
VDEVATTN EQO X'80» 
VDEVTIC EQO X»40» 
VDEVTRAN EQO X«20» 

VDEVVCF EQO XMO» 
VDEVAOCR EQO X»08' 



Pointer to spool extension block 
Spare pointer to spool extension block 
Pointer to VCONCTL console control 
Pointer to VSPLCTL spool control 
Spool output class 
Storage key in user's CAW 
Spool output directed device address 
Number of copies requested 
Console - virtual console flags 



Dser pressed Attention key two or more times 

Last CCW processed was a TIC 

Data transfer occurred during this channel 

program 
Virtual console function in progress 
Automatic carriage return en first read 
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VDEVBLCK 



Hexadecimal Field 
risplacement Name 



27 



VDEVSFLG DS 



IX 



Bits defined in VDEVSFLG 

VDEVFEED EQD X'80« 

VDEVXFER EQO 

VDEVCONT EQD 

VDEVHOLD EQU 

VDEVFOR EQD 

VDEVEOF EQD 



VDEVTERH EQD 
VDEVCFCL EQD 
VDEVPDBG EQD 
VDEVDIAG EQD 
VDEVSVC EQD 



X»80' 
X»40' 
X'20» 
XMO' 
X'08» 
X'08' 
X«OU» 
X»02» 
X«02» 
X'01« 



Field Description, Contents, Meaning 
Spool - virtual spool flags 



Spool reader - last command ¥as a feed 

Spool output - transferred to VDEYXDSR 

Sped device - continuous operation 

Hold output - save input 

Spool output - for user and distribution 

Spool input - set unit exception at EOF 

Terminal output required for spooled console 

Device closed by console function 

Spool output - purge file at close 

Spool input - device opened by DIAGNOSE 

Spool device busy by CP 
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VFCBELOK, VMABLOK 



VFCBELOK: VIRTDAL FOBMS CONTROL BUFFER BLOCK 



VFCBBLOK is exclusively used for virtual 3211 printer carriage ccntrcl forms activity. 



I 



VFCBCNT 



I V*1 I V*2 I 



VFCEHORK 



8 I VFCBSPAR I V*3 | 
I 1 

10 . 



VFCBLOAD 



Hexadecimal Field 
Displacement Name 



VFCBCNT DS 
VFCBFLAG DS 



1H 
IX 



liis defined in VFCBFLAG 
VFCBEOF EQD X'80» 
VFCBCMD EQO X'40» 



VFCBCHL DS 
VFCBHORK DS 
VFCBSPAR DS 
VCFENHEX DS 
VFCBLOAD DS 



IX 
IF 
2X 
IX 
CL181 



Field Description, Contents, Meaning 

Current pointer to carriage column 
V*1 Working flag byte 



End-cf-forms passed once 
Forms control given 

V*2 Channel numter or space count 

Work area 

Spare 
V*3 ladex byte value 

Forms control buffer area 



VFCBSIZE EQU {*-VFCEELOK) /8 Size in doutlewcrds (XM8M 



I IMAiiOK: SHARED SYSTEMS CONTROL ADDITION TO VIIBLCK 

VMABLOK contains the name of a shared system, a pointer to the share table (SHETAELE) , 
and a pointer to the next VMABLOK. The VMASSIST field in the VKELCK points to the 
VMABLOK. 



I 



VMAFPNT 



VMASHRBK 



VMANAHE 



Hexadecimal Field 
Displacement Name 



VMAFPNT DS 1F 

VMASHRBK DS IF 

VMANAME DS CL8 

VMASIZE EQU (*-VMABLOK) /8 



Field Description, Contents, Meaning 

Forward pointer to next VMABLOK 
Address of share table (SHHTAELE) 
Identification of named shared system 

VMAELCK size in doublewords (X'02M 
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VMBLCK 
ZiJBLOK: VIRTOAL MACHINE CONTROL BLOCK 

VMBLOK is used as the primary control block for almost all activities related to a single 
virtual machine. This block contains the following information: the dispatch and priority 
level of the virtual machine, the virtual machine's processor registers, preferred 
virtual machine option values, and other values significant tc virtual machine 
operations. The ASYSVH field of the PSA points tc the system VMELOK. 



VMQFPNT 



VMQBPNT 



81 



VMPNT 



VMECEXT 



101 VMSEG 
I 



VHSIZE 



TTMOac?«r. T!lm 



» ncuoiKX 



201 VMDVSTRT 
I 



VMTERM 



28IVMVTERM lYMTRMID |V*1 |V*2 |V*3 |V*4 



30IVIICHCNT IVMCDCNT |VMDVCNT IVMIOACTV 
I 

381 VMCHTBL 



58|¥*5 |?*6|?*7 |V*8 |V*9 | V*10 | V*1 1 | ?*12 



60 I V* 1 3 I V* 1 a I Y* 1 5 1 Y* 1 6 



VMLOCKER 



68|V*19|Y*20|YMIOINT j VMTIMER 
I 

701 YMVTIME 

I 

781 YMTMODTQ 

I 

801 YMTTIME 



881 



YMTMINQ 



901 

I 

981 



YMTODINQ 



YMINST 



|Y*17|Y*18 



AOI YMTREXT 
I 

A8| 

I 

EOI 



YMADSTOP 



YMPSH 



YMGPRS 



101 



VMFPRS 



1101 

I 

1181 



VMDSER 



120 


r .. . _ . 

VMDIST 


128 


YMPGREAD | YMPGWRIT 


130 


YMHCNT IVMSEGDSP | VHSTOR 


^ -^ ^ 

1 JC 


vnlOCNT 1 VaPSCH 


lac 


VMLINS 1 YHCRDS 


1i*8 


YHCOKND 


150 


/VMPDBDH/I/VBPDISK/I YHPAGES | VMPRGIL 


158 


YMEEECH lYMQPBICB | YMUSPHCJ | VMSTEALS 


16C 


VHTIMEON 1 YMTRCBLK 


168 


VMACCDNT 1 YMRDINQ 


17C 


YMPGRINQ 1 YMEPHIOR 


178 


VHSTKO 1 YMMICRO 


180 


YMPFUNC 1 VHPXINT 


188 


YMDELAY | VMRPRIOR 


190 


YHPGPNT 1 YBNDCNT IVMSHRSYS 


198 


V*21|Y*22|V*26|Y*27| YMASSIST 


1AC 


VMCPNT 1 YMCPDID |/Y*25/ 


1A8 


7HL0CK 1 VHDFTPNT 


lEC 


YMUSER1 1 YMUSER2 


1E8 


YMDSER3 1 YMDSER4 


ICC 


YMUHS 1 VHPCKP 


1C8 


VMXPG |C*1 |C*2 1 YKSTKCNTI VMPRRCT 


1E0 


YMSWPHIG |C*3|C*4|Y*28 |V*29 


1D8 


VHCFTIME 


1EC 


VMAPTIHE 


1 1E8 
I 


VMACTDEYI VKFLPAG |V*30|RSVD| YMCONLN 


1 1FC 


YMCONBDF ( Y*31 | //RESERVED/// 



YMACNT 
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VMBLOK 



Hexadecimal 


Field 






Eisplacement 


Nane 









VMQFPNT 


DS 


IF 


4 


VMQBPNT 


DS 


IF 


8 


VMPKT 


DS 


IF 


C 


VMECEXT 


DS 


IF 




VMVCRO 


EQU 


VMECEXT 


10 


VMSEG 


DS 


1F 


14 


VMSIZE 


DS 


1F 


18 


VMCHSTRT 


DS 


IF 


1C 


VMCDSTRT 


DS 


IF 


20 


VMDVSTRT 


DS 


IF 


2H 


VMTERM 


DS 


IF 


28 


VMVTERH 


DS 


1H 


2A 


VMTRMID 


DS 


1H 


2C 


VHTLEND 


DS 


1C 


2D 


VMTLDEL 


DS 


1C 


2E 


VMTCDEL 


DS 


1C 


2F 


VMTESCP 


DS 


1C 


30 


VMCHCNT 


DS 


1H 


32 


VMCOCNT 


DS 


1H 


34 


VMDVCNT 


DS 


1H 


36 


VMIOACTV 


DS 


1H 


38 


VMCHTBL 


DS 


16H 


58 


VMRSTAT 


DS 


IX 




Bits def; 


Lned 


in VMRSTAT 




VMCFWAIT 


'equ 


X'80» 




?^»PG»AIT 


E^a 


X»40« 




VHIOWAIT 


EQO 


X«20« 




VMPSWAIT 


EQU 


X«10» 




VMEXWAIT 


EQO 


X«08« 




VMLOGON 


EQU 


X«04' 




VMLOGOFF 


EQU 


X«02» 




YMIDLE 


EQO 


X'01» 




VMCPWAIT 


EQU 


VMCFWAIT+ 




VMNORON 


EQO 


VMCPHAIT+ 




VMLONGiT 


EQU 


VHCFWAIT+ 



59 



VMDSTAT DS 



1X 



Bits defined in VMDSTAT 



VMDSP 


~EQO 


X'80' 


VMTSEND 


EQO 


X«40» 


VMQSEND 


EQO 


X«20' 


VMTIO 


EQO 


XMC 


VMRON 


EQO 


X»08' 


VMINQ 


EQO 


X'04» 


VMELIG 


EQU 


X»02» 


VMPAZAPL 


EQU 


X'01' 



Field Description, Contents, Meaning 

Pointer to next VMELCK in queue 
Pointer to pi-evious VMELCK in queue 
Pointer (CYCLIC) to next VMELCK 
VMBLCK extended control pointer - ECELOK 

Virtual control register for non-EC mode 
virtual machine 



ter to VMSEGTBL 

ual temporary storage size in bytes 

ter to VCHBLOK table 

ter to VCOBLOK table 

ter to VDEVBLCK table 

ter to EDEVELOK for user terminal 

lacement to virtual console VDEVBLOK 

urce ID of real terminal if 370x 

inal line end symbol 

inal line delete symbol 

inal character delete symbol 

inal escape symbol 

ual channel count 

ual control unit count 

ual device count 

ve channel mask 

nels attached - VMCHSTBT index 

ual machine running status 



Waiting - Executing console function 
taiting - Paging operation (s) 
Waiting - Scheduled lOELOK start 
Waiting - Virtual FSW wait state 
Waiting - Instruction simulation 
User not logged on 
Oser logging off 
Virtual machine in idle wait state 

VMPGWAIT+VMIOWAIT+VMEXWAIT+VMLOGCFF+VMLOGOK 

VMPSWAIT 

VMLOGOM+VMLCGOFF+VMIDLE 

V*6 Virtual machine dispatching status 



Virtual machine is dispatched run user 
Virtual machine is compute bound 
Virtual machine in-queue time slice end 
Virtual machine is in TIO busy loop 
Virtual machine runnable 
Virtual machine in a queue 
Virtual machine in eligible list 
Dse dispatch path DMKDSPCH 





Poin 




Virt 




Poin 




Poin 




Poin 




Poin 




Disp 




Reso 


V*1 


Term 


V*2 


Term 


V*3 


Term 


V*4 


Term 




Virt 




Virt 




Virt 




Acti 




Chan 


V*5 


Virt 
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VHBLCK 



Hexadecimal Field 
Eisplacement Name 

5A 



VHOSTAT 


DS 


IX 


Bits def 
YHSYSoi 


ined 
"eqd 


in VMOS 
X»80« 


VHSHR 


EQD 


X'40' 


VMSLEEP 


EQO 


X»20« 


VMDISC 


EQD 


XMO' 


VMCFRDN 


EQD 


X»08» 


TMVIRCF 


EQD 


X'04« 


VMCF 


EQD 


X«02» 


VMKILL 


EQD 


X«01» 



5B 



VMQSTAT DS 



IX 



Field Description, Contents, Meaning 
V*7 Virtual machine operating status 



Virtual machine is system operator 

Virtual machine running shared system 

Virtual machine is in SLEEE state 

Virtual machine console disconnected 

Virtual machine running in console function 

mode 
Virtual machine executing virtual console 

function 
Virtual machine executing console function 
Virtual machine is to te legged off 

V*8 Virtual machine queueinq status 



5C 



5D 



5E 



Bits def: 


Lned 


in VMPSTAT 


VMPEIDSP 


EQD 


X»80« 


VMADTLOG 


EQD 


X»40» 


VMHSERNG 


EQD 


X'20' 


VMDLDRP 


EQD 


XMO' 


VHWSCHG 


EQD 


X'08» 


VMINHMIG 


EQD 


X»04» 


VMCFREAD 


EQD 


X«02» 


VMPA2APL 


EQD 


X»01» 


VMPSTAT 


DS 


IX 



Bits defined in VMPSTAT 

VMISAM EQD X»80' 

VMV370R EQD X'40» 

VMRPAGE EQD X'20« 

VMREAL EQD XMO« 

w aa\jj.Rtia ai^O a. \j O 

VMNSHR EQD X»04» 

VMACCODN EQD X»02» 

VMPAGEX EQD X«01» 

VMESTAT DS 1X 

B its defined in VMESTAT 

VMSHADT EQD X»80' 

VMPERCM EQD X»40» 

VMBADCRO EQD X«20» 

VMMICSVC EQD XMO' 



Virtual machine eligible for gueue 1 

Autclcgged user is in disconnect mode 

Last working set error was negative 

Delayed queue drop flag 

Force a new working set on gueue entry 

Page migration switch 

Virtual machine with console function read on 

Reflects external interrupts to machine 

V*9 Virtual machine processing status 



Virtual machine has ISAM CCW checking 

Virtual machine can use extended format 

Virtual machine can reserve pages 

Virtual machine has virtual=real option 



VMEXTCM EQD 
VMNEHCRO EQD 
VMINVSEG EQD 
VMINVPAG EQD 
VMECZAP EQD 



X'08' 
X'04' 
X»02' 
X'OI* 
255-VMMICSVC 



VMTRCTL 


DS 


IX 


Bits def 


ined 


in VMTRCTL 


VMTRPEH 


EQD 


X»80' 


VMTRSVC 


EQD 


X'40' 


VMTRPRG 


EQD 


X'20' 


VHTRIO 


EQD 


X'10' 


VMTREX 


EQD 


X»08' 


VMTRPRV 


EQD 


X»04» 


VMTRSIO 


EQD 


X'02' 


VMTRBRIN 


EQD 


X'OI' 


VMTRINT 


EQD 


VMTRSVC+ 



\t ^ ^ ^ rr 



.1 — ■^^t-.J.i^^ -c ^-^ 






.i- ausxa I. J.U11 j.v>x. v x^ i. uax — u. caj. ussCi. 



Running nonshared named saved system 
Virtual machine may punch account cards 
Virtual machine receiving pseudc page faults 

V*10 Virtual machine control status 



Shadow tatles are present 

Virtual CP PER active 

Virtual control register is invalid 

Dser wants SVCs done by virtual machine 

assist feature 
Virtual machine in extended control mode 
Virtual control register has changed 
All shadow tables invalid 
Shadow page tables invalid 
All bits except VMMICSVC 



V*11 Virtual machine tracing control 



Virtual PER tracing active 
Trace user SVC instructions 
Trace virtual program interrupts 
Trace virtual I/O interrupts 
Trace external interrupts 
Trace user privileged instructions 
Trace virtual I/O instructions 
Trace successful branches or all 

instructions 
;+VMTRIO+VMTREX Trace all user interrupts 
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VHBLOK 






Hexadecimal 


Field 




Eisplaceaent 


Nane 




5F 


VMHLEVEL DS 


IX 




Bits defined 


in VMMLEVEL 




VHMSGON EQO 


X«80' 




VMWNGON EQU 


X'40» 




VMMCODE EQO 


X'20» 




VMMTEXT EQD 


XMO' 




VMMLINED EQD 


X»08« 




VMMACCON EQD 


X«04' 




VMMCPENV EQD 


X»02» 




VMMSTMP EQD 


X'OV 



60 



VMQLEYEL DS 



1X 



Field Description, Contents, Heaning 
V*12 Message level 



Receiving messages 

Receiving warnings 

Receiving error message codes 

Receiving texts of error messages 

Line editing on 

Receiving accounting information 

Terminal in CP mode 

Time stamp desired on console output 

V*13 Queue level 



Bits defined in VMHLEVEL 



VMQ1 


EQD 


X»80» 


VMCOMP 


EQD 


X«40» 


VMHIPRI 


EQO 


X«20« 


VMLOPRI 


EQD 


X»10« 


VMAEX 


EQD 


X»08« 


VMAEXP 


EQD 


X'04« 


?MQ3 


EQD 


X»02' 



61 



VMDR0P1 EQD X'02» 
VMFS EQD X»01» 
VMCLEVEL DS IX 



Virtual 

Virtual 

Virtual 

Virtual 

Virtual 

Virtual 

Virtual 

that 

share 

Virtual 

bit i 

Dsing B 



machine 

machine 

machine 

machine 

machine 

machine 

machine 

this bit 

schedul 

machine 

s used o 

ore than 



is interactive 

is compute bound 

is highest priority 

is lowest priority 

is assured execution 

is assured percentage 

using multiple C2. Note 

is used only by the fair 
er. 

dropped from QL This 
nly by the standard scheduler, 

fair share flag 



V*m Command level 



62 



Bits defined 


in VHCLEVEL 










VMCLASSA 


EQD 


X»80« 


Privilege 


Class 


A 


functions 


VMCLASSB 


EQD 


X'40' 


Privilege 


Class 


6 


functions 


VMCLASSC 


EQD 


X'20' 


Privilege 


Class 


C 


functions 


VMCLASSD 


EQD 


XMO« 


Privilege 


Class 


D 


functions 


VMCLASSE 


EQD 


X»08» 


Privilege 


Class 


E 


functions 


VMCLASSF 


EQD 


X»04' 


Privilege 


Class 


F 


functions 


VMCLASSG 


EQD 


X»02» 


Privilege 


Class 


G 


functions 


VMCLASSH 


EQD 


X«01» 


Reserved i 


Eor IBM use 



VMTLEVEL DS 



IX 



V*15 Timer level 



Bits def; 


Lned 


in VMTLEVEL 


VMTON 


EQO 


X'80» 


VMRON 


EQD 


X»40« 


VMCPOTMR 


EQO 


X»20« 


VMSTMPI 


EQD 


X»08» 


VMSTMPT 


EQO 


X»04» 


VMTMRINT 


EQD 


X»01' 



Bits redefined for S^stei 
VMTIDLE EQD VHTON 
VMTPAGE EQO VMRON 

VMTIONT EQD VMSTMPI 



Virtual timer running 

Virtual real timer running 

Virtual processor timer in real processor 

timer 
Virtual interval timer reguest queued 
Virtual processor timer request queued 
Interrupt from processor real timer pending 

VMBLOK 

Processor timer contains idle wait state time 
Processor timer contains system page wait 

time 
Processor timer contains I/O wait state time 
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VMBLCK 



Hexadecimal 
Eisplacement 

63 



Fieia 
Name 

VMPEND 



DS 



IX 



64 
68 



69 



6A 
6C 
70 
78 
80 
88 



90 
98 

9E 
9F 
AG 

in 

A8 
BO 
FO 
110 
118 
120 
128 
12C 
130 
132 

134 
138 
13C 
140 
144 
148 
150 
152 
154 
156 
158 
15A 
15C 



Bits defined in VMPEND 
VMDEFSTK EQU xT80' 



VMPERPND 


EQU 


X«40« 


VMPRGPND 


EQD 


X'20' 


VMSVCPND 


EQD 


X«10» 


VMPGPND 


EQD 


X«08» 


VMIOPND 


EQU 


X»02» 


VMEXTPND 


EQD 


X»01« 


VMLOCKER 


DS 


IF 


VMFSTAT 


DS 


IX 


Bits def; 


Lned 


in VMFSTAT 


VMFBMX 


"eqd 


X»80« 


VMFADTO 


EQD 


X'40» 


VMFVTMR 


EQD 


X'20« 


VMNPHDCL 


EQD 


X»04« 


VHHLVL2 


DS 


IX 


Bits def: 


Lned 


in VMBLVL2 


7MMIMSG 


"eqd 


X»80» 


VMIOINT 


DS 


1H 


YMTIMER 


DS 


1F 


VMVTIME 


DS 


ID 


VMTMOUTQ 


DS 


1D 


VMTTIME 


DS 


ID 


VBTMINQ 


DS 


ID 


VMTSOOTQ 


EQD 


VHTMINQ 


VMTODINQ 


DS 


ID 


VMINST 


DS 


3H 


VMOPRIOR 


DS 


1H 


VMPSHDCT 


DS 


IX 


VMfREXT 


DS 


IF 


VMADSTOP 


DS 


IF 


VMPSH 


DS 


ID 


VMGPRS 


DS 


16F 


VMFPRS 


DS 


4D 


VMDSER 


DS 


CL8 


VMACNT 


DS 


CL8 


VMDIST 


DS 


CL8 


VMPGEEAD 


DS 


IF 


VMPGWRIT 


DS 


IF 


VMHCNT 


DS 


1H 


YHSEGDSP 


DS 


1H 


VMSTOR 


DS 


IF 


VMIOCNT 


DS 


IF 


VHPNCH 


DS 


IF 


VHLINS 


DS 


IF 


VMCRDS 


DS 


IF 


VMCOMND 


DS 


CL8 


VHPDRDM 


DS 


1H 


VMPDISK 


DS 


1H 


VHPAGES 


DS 


1H 


VHPRGIL 


DS 


1H 


VMDEDCH 


DS 


1H 


VMQPRIOR 


DS 


1H 


VMBSPROJ 


DS 


1H 



Field Description, Contents, Meaning 
Y*16 Interrupt pending summary flag 



Deferred task wait for system lock 
Virtual PER interrupt pending 
Virtual program interrupt deferred 
Virtual SVC interrupt deferred 
Virtual pseudo page fault pending 
Virtual I/O interrupt pending 
Virtual external interrupt pending 

Base address of holder of VMLCCK 
V*19 Virtual machine feature status 



Virtual block multiplexer channels 

Autopcll handshake option in use 

Dser requested virtual timer assist enabled 

Virtual machine requests password suppression 

V*20 Additional message handling information 



Receiving all informational messages 

I/O interrupt pending flags 

Virtual timer value - X*50* 

Virtual processor time used 

Time remaining in queue 1 and/or queue 2 

Total time while in supervisor state 

VMTTIME value at entry to queue 

Supervisor time allowed (redefine label) 

TOD clock time stamp at queue entry 
Virtual machine privileged or tracing 
instruction 

V*17 Dser priority from directory 

V*18 Invalid LINK password count 

Address of extended trace control block 

Address of address stop control block 

Virtual machine PSU 

Virtual machine general purpose registers 

Virtual machine floating-point registers 

Virtual machine identification 

Virtual machine accounting number 

Virtual machine distribution code 

Total page reads 

Total page writes 

Page wait count 

Displacement of virtual machine SEGTABLE from 

start of block 
Permanent storage size (in bytes) 
Virtual SIO count for nonspocled I/O 
Virtual card count - spooled punch 
Virtual line count - spooled printer 
Virtual card count - spooled reader 
Last CP command executed 
Reserved for IBM use 
Reserved for IBM use 

Number of real pages currently resident 
ILC for latest program interrupt 
Mask for dedicated channel 
Priority in dispatching queue 
Projected working set size 
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VMBLOK 








Hexadecimal 


Field 






Eisplacement 


Name 






15E 


VMSTEALS 


DS 


1H 


160 


VMTIMEON 


ES 


IF 


164 


VMTRQBLK 


DS 


IF 


168 


VMACOONT 


DS 


IF 


16C 


VMRDINQ 


DS 


IF 


170 


VMPGRINQ 


DS 


1F 


174 


VMEPRIOR 


DS 


IF 


178 


VMSTKO 


DS 


1F 


17C 


VMMICRO 


DS 


IF 






ORG 


VHMICRO 


17C 


VMHCR6 


DS 


IX 




Bits def: 


Lned 


in VMMCR6 




VHMFE 


'eqd 


X»80» 




VMMPROB 


EQO 


X'40» 




VMMNOSK 


EQO 


X»20' 




VMM360 


EQD 


X'10» 




VMMSVC 


EQU 


X»08» 




VMMSHADT 


EQD 


X»04» 




VMMCPAST 


EQD 


X»02' 




VMMVTMR 


EQO 


X»01« 


17D 


VMMADDR 


DS 


3X 


180 


TMFFOTJC 


DS 


tF 


184 


VMPXINT 


DS 


IF 


188 


VMDELAY 


DS 


IF 


18C 


VMRPRIOR 


DS 


IF 


190 


VMPGPNT 


DS 


IF 


194 


VHNDCNT 


DS 


1H 


196 


VMSHRSYS 


DS 


1H 


198 


VMRESC 


DS 


IX V*21 


199 


VMCXSTAT 


DS 


IX V*22 




Bits def: 


Lned 


in VMCXSTAT 



VMBGADTH EQD X'80' 
VMIOLOG EQD X«20' 



VMVCR14 EQD VMCXSTAT V*22 



Field Description, Contents, Meaning 

Number of waits for stolen pages 

Logon time — TOD clock word 

Address of TRQBLOK for real timer 

Address of user ACCTELOK 

Page read total (VMPGREAD) at queue entry 

Sum of virtual machine pages count at each 

page read 
Eligible list priority 
Console function output stack pointer 
Virtual machine assist - real control R6 



Control register 6 - hardware flag byte 



Virtual machine assist feature enabled 

Virtual machine in problem state 

Virtual machine assist does not handle SSK, 

or ISK 
S/360 operations only; no EC mode operations 

allowed 
Virtual machine assist does net handle SVCs 
Shadow tables present (EC node and translate) 
CP assist feature enabled 
Virtual interval timer assist feature enabled 

Control register 6 - address of virtual 
machine's pointer list (BICELOK) 

FFnn fuRCt icn t able 

Extended external interrupt stack pointer 

TRQELOK for delayed SLEEP or LOGOFF 

Run list dispatching priority 

Pointer to list of pages in PGBLOK 

Nondeferred page read count 

Number of shared named systems 

Remote display line count 

VMCF status byte 



VHCF active 

I/O logout mask bit from control register 
14. Referenced through VMVCR14.. 

Contains I/O logout mask bit from control 
register 14 (for both EC and BC mode) . 
During EC mode, control register 14 data is 
also kept in the ECELOK. 



19A 



VHAFF 



DS 



IX 



V*26 Affinity request field 



lii§ Refined in VMAFF 
VMAFFON EQD X*40» 
VMAFFAD DS 0BL6 



Affinity set on 
Processor address 



19B VMLSTPRC DS IX V*27 Last processor executed in problem state 

19C VMASSIST DS IF Pointer to list of VMAELOKs 

lAO VMCPNT DS IF VMCELOK anchor 

1A4 VMCPDID DS 3X Processor identification number in binary 

1A7 VMNOECPS DS IX V*25 Reserved for IBM use 

1A8 VMLOCK DS IF Lock word for compare and swap locking 

lAC VMDFTPNT DS IF Deferred task pointer 

IBO VMDSERI DS IF Reserved for installation use 

1B4 VMDSER2 DS IF Reserved for installation use 
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VMELCK 



Hexadecimal 


Field 






Displacement 


Name 






1B8 


VM0SER3 


DS 


1F 


1BC 


VM0SER4 


DS 


IF 


ICO 


VMDHS 


DS 


1F 


1C4 


VMPCKP 


DS 


1F 


1C8 


VHXPG 


DS 


1H 


1CA 


VMQ2CNT 


DS 


IX 


1CB 


VMQ3CNT 


DS 


1X 


ICC 


VMSTKCNT 


DS 


1H 


1CE 


VMPERCT 


DS 


1H 


1D0 


VMSWPMIG 


DS 


1F 


1DU 


VMFVRF 


DS 


IX 


1D5 


VMCRTO 


DS 


1X 


1D6 


VMSHRPRC 


DS 


1X 


1D7 


VMGRFTAB 


DS 


1X 


1D8 


VMCPTIHE 


DS 


ID 


1E0 


VMAPTIME 


DS 


ID 


1E8 


VMACTDEV 


DS 


1H 


lEA 


VMFLPAG 


DS 


IH 


1EC 


VMSPMFLG 


DS 


IX 



Field Description, Contents, Heaning 

Reserved for installation use 

Reserved for installation use 

Recent history of user processor utilization 

User page read checkpoint 

Maximum virtual machine pages count in-queue 

C*1 Consecutive queue 2 count 

C*2 Count of consecutive Q2s allowed 

Count of stacked ICB plus CPEXBICKs 
Processor related stacked CPEXBtCKs 
Pointer to pseudo page table 

C*3 SET FAVORED percentage for user 

C*4 COMPCTE/ELAPSED ratio 
V*28 Processor (main or attached) whose shared 

segments were last used 
7*29 GRAF virtual console logical tab 
Main processor supervisor time 
Attached processor supervisor tine 
Virtual device address for last virtual SIC 
Count of nonshared flushed pages 
V*30 VMCF special message flag 



Bits defined in VMSPMFLG 
VMSPMON EQO X»40' 
VMSMSGON EQO X»20« 



Receiving special messages 
Processing special messages 



1ED 


RESERVED 


DS 


IX 


1EE 


VMCONLN 


DS 


1H 


1F0 


VMCONBDF 


DS 


IF 


1F4 


VMPSHDCA 


DS 


IX 


1F5 


RESERVED 


DS 


3X 




VMBSIZE 


EQO 


(*- 



V*31 



Reserved for IBM use 
Bytes left in response buffer 
Virtual address of response buffer 
Invalid ADTCLOG password count 
Reserved for IBM use 



(*-VMBL0K)/8 VMELCK size in doutlewords (X»38') 
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VMCBLOK 



VHCBLOK: VIRTUAL MACHINE COMMUNICATION BLOCK 



VMCBLOK contains data transfer and status information used by the Virtual Machine 
Communication Facility (VMCF) . The VMCPNT field of the VMBLOK points to VMCELOK. 



10 



18 



20 



28 



30 



r - 

1 V*1 


1 V*2 1 VMCFUNC 


1 


VMCKID 


1 

1 

1 


1 — ■■ ■■■ ' 1 

1 VMCUSER 1 




VHCVADA 


1 


VMCLENA 


1 

1 
1 




VMCVADB 


1 


VMCLENB 


1 


1 ... .. . . . . , 

1 VMCUSE 1 




VMCFPNT 


1 V*3 


1 v*a 1 V*5 


l/V*6//| 
1 


1 




VMCTOD 




1 

J 



Hexadecimal Field 
Eisplacement Name 



2E 



2F 
30 



VMCSTAT DS 



IX 



Bits defined in VMCSTAT 
VMCRESP EQU X«80» 
VMCRJCT EQU X»40» 
VMCPRTY EQU X'20' 



1 


VMCEFLG 


DS 


1X 


V*2 


2 


VMCFUNC 


DS 


1H 




4 


VMCMID 


DS 


IF 




8 


VMCUSER 


DS 


1D 




10 


VMCVADA 


DS 


IF 




14 


VMCLENA 


DS 


IF 




18 


VMCVADB 


DS 


IF 




1C 


VMCLENB 


DS 


1F 




20 


VMCUSE 


DS 


ID 




28 


VMCFPNT 


DS 


IF 




2C 


VMCKEY 


DS 


IX 


V*3 


2D 


VMCCSTAT 


DS 


IX 


V*U 




Bits def. 


Lned 


in VMCCSTAT 






VMCCXINT 


EQU 


X»80» 






VMCCRECP 


EQU 


X'UO' 






VMCCBUSY 


EQU 


X»20« 





VMCASTAT DS 



IX 



Bits defined in VMCASTAT 
VMCAAUTS EQU X«80» 
VMCAPRTY EQU X»40' 
VMCAQIES EQU X'20» 



VMCRSB1 DS 
VMCTOD DS 



1X 

ID 



Field Description, Contents, Meaning 
V*1 VMCELOK user status 



Final response interrupt 
Message rejected 
Pricrity message 

Data transfer return code 

Subfunction code 

Message identifier 

Source and/or sink userid (VMDSEH) 

Vaddr of message buffer 

Length of message 

Vaddr of reply buffer (SENE/RECV only) 

Length of reply buffer (SENE/BECV only) 

User-supplied doubleword 

Address of next VMCBLOK 

User PSW key 

VMCELOK control status 



External interrupt VMCELOK 
Transaction processed 
VMCELOK busy 

V*5 VMCELOK authorization status 



Authorized specific 
Authorized priority 
User is guiescent 

V*6 Reserved for IBM use 

TOD at authorization and/or build operation 



VMCBSIZE EQU (*-VMCBLOK) /8 VMCELOK size in doublewords 

Redefinition for Master VMCBLOK 

VMCACNT EQU VMCFUNC ~Active message count 
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VKCMHDR 



VMCMBDB: VMCF MESSAGE HEADER 



VMCMHDR provides information to identify the special 7HCF external interrupts, 



1 T*1 


1 V*2 1 VHCMFUNC | 


VHCHEID 




1 VHCMDSER 




VMCMVADA 


1 


7MCHLENA 






YMCMVADB 


1 


VMCPLENE 








VMCMDSE 










VMCHBDF 







8 
10 
18 
20 
28 



(Optional Message Euffer) 



Hexadecifflal 
Eisplacement 



1 

2 

fi 

8 
10 
14 
18 
1C 

r>r\ 

28 



Field 
Name 



VMCMSTAT DS 1X 

liis defined in VMCMSTAT 

VMCMRESP EQU x"^80» 

VMCMRJCT EQO X'a0» 

VMCMPRTY EQD X«20' 



7*1 



VMCMEFLG 


DS 


IX 


VMCMFONC 


DS 


1H 


TTMr"*IMTT\ 


ne 


IF 


7MCMDSER 


DS 


ID 


VMCMVADA 


DS 


IF 


VMCMLENA 


DS 


1F 


VMCMVADB 


DS 


IF 


VMCMLENB 


DS 


IF 


VMCMUSE 


DS 


-|T> 
1 U 


VMCMBDF 


DS 


OX 



V*2 



VMCMLEN EQD (*-VMCMHDR) 



Field Description, Contents, Meaning 
Message status tyte 



Final response interrupt 
Message rejected 
Priority message 

Data transfer return code 

Subfunction code (original request) 

Message identifier 

Source and/or sink userid (VMDSEB) 

Virtual buffer address 

Message length 

Virtual reply buffer address 

Reply buffer length 

\tanx. a U j-< p JL J.<CU U\J UJJO.^ MUX. u 

Optional SENDX data buffer 
VMCMBDR size in bytes 
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VMCPARM 



VMCPABM: YMCF PARAMETER LIST 



VMCPARM contains the user-supplied parameters when a VMCF 
Register 1 in the Diagnose instruction points to VMCPARM. 



subfuncticn is executed, 



10 



18 



20 



1 V*1 


|/V*2//| VMCPFDNC | 


VMCPMID 


1 


1 ' ■ ' .... , 

1 VMCPOSER 1 




VMCPVADA 


1 


VMCELENA 






VMCPVADE 


1 


VMCELENE 




1 




VMCPOSE 




J 



Hexadecimal Field 
Displacement Name 



8 
10 
14 
18 

1C 

20 



VMCPFLG1 DS 



IX 



Bits defined in VMCPFLGJ 
VMCPAUTS EQU X»80' 
VMCPPRTY EQU X«40' 
VMCPSMSG EQU X»20» 



VMCPFLG2 


DS 


IX 


VMCPFDNC 


DS 


1H 


Bits defined in VMCPFDNC 


VMCPRJCT 


EQD 


X«000B» 


VMCPIDEN 


EQD 


X'OOOA' 


VHCPRESM 


EQD 


X«0009» 


VMCQDIE 


EQD 


X«0008» 


VMCPREPL 


EQD 


X»0007» 


VMCPCANC 


EQD 


X«0006' 


VMCPRECV 


EQD 


X'0005' 


VMCPSENX 


EQD 


x»oooa» 


VMCPSENR 


EQD 


X«0003' 


VMCPSEND 


EQD 


X»0002» 


VMCPDADT 


EQD 


x»oooi» 


VMCPADTH 


EQD 


X'OOOO' 


VMCPMID 


DS 


IF 


VMCPDSER 


DS 


ID 


VMCPVADA 


DS 


IF 


VMCPLENA 


DS 


IF 


VMCPVADB 


DS 


IF 


VMCPLENB 


DS 


IF 


VMCPDSE 


DS 


ID 



VMCPLEN EQD (*-VMCPARM) 



Field Description, Contents, Meaning 
V*1 VMCPARM flag byte 



Authorize specific request 
Priority message 
Receiving special messages 

V*2 Reserved for IBM use 
Subfunction code 



REJECT 

IDENTIFY 

RESDHF 

QDIESCE 

REPLY 

CANCEL 

RECEIVE 

SENEX 

SENE/HECEIVE 

SEND 

DNADTHORIZE 

ADTHCRIZE 

Message identifier 

Target userid 

Virtual address of message buffer 

Length of message 

Virtual address of reply buffer (SEND/RECEIVE 

only) 
Length of reply buffer (SEND/RECEIVE only) 
User supplied doubleword 

Length of VMCPARM (bytes) 
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VERBLCK 



VBRBLOK: VIST DAL RESERVE/RELEASE BLOCK 



VRRBLOK is linked to the VDEVBLOK and contains 
VEEVRRB field of the VDEVBLOK points to VBRBLOK. 



infcrniaticn about minidisk usage. The 



I VRRAED 
I 



I V*1 |/V*2/| 



VRECPEX 



VRRDSER 



I//////////VRRRSV2////////// I 

1 



Hexadecimal Field 
Eisplacement Name 






VE8ADD 


DS 


1H 


2 


VRRSTAT 


DS 


IX 




Bits def 


ined 


in VSRSTAT 


2 


VRRRES 


EQO 


X«80» 


3 


VRRRSV1 


DS 


IX 


4 


VERCPEX 


DS 


IF 


8 


VRRUSER 


DS 


IF 






reserved 


C 


VEERSV2 


DS 


IF 



Field Description, Contents, Heaning 

Reserved virtual device address 
V*1 Virtual RFSFRVE/RELEASE status flags 



Minidisk is reserved 

V*2 Reserved for IBH use 

Queued request for the minidisk 

VHBLCK of the user who has the minidisk 



VRRSIZE EQO (*-VERBLOK) /8 



Reserved for IBM use 

Size in doutlewords (X»02») 
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VSPLCTL 



VSPLCTL: VIRTDAL SPOOLING CONTROL BLOCK 



VSPLCTL is linked to the VDEVBLOK and contains information for opened spool files. 
VEEVSPL field of the VDEVBLOK points to VSPLCTL. 



The 



r - - 

1 VSPCAW 


1 


VSEEPAGE 


1 VSPVPAGE 


1 


VSPHECNO 


1 VSPNEXT 1 VSPIDACT | 


VSESEBLK 


1 VSPCCW 


1 VSPBDEBK 


1 


VSEHISC 


1 V*1 1 VSPIDAL 


1 


VSEIDAW2 



10 
18 

20 
28 



Hexadecimal Field 
Eisplacement Name 





4 

8 

C 

10 

12 

14 

18 

20 

24 

28 

29 

2C 



VSPCAW 


DS 


IF 




Virtual 


VSPDPAGE 


DS 


1F 




EASE loc 


VSPVPAGE 


DS 


IF 




Virtual 


VSPRECNO 


DS 


IF 




Records 


VSPNEXT 


DS 


1H 




Eisplace 


VSPIDACT 


DS 


1H 




Data byt 


VSPSFBLK 


DS 


IF 




Pointer 


VSPCCW 


DS 


ID 




Current 


VSPBUFBK 


DS 


IF 




Address 


VSPMISC 


DS 


IF 




Use vari 


VSPIDASW 


DS 


IX 


V*1 


Indirect 


VSPIDAL 


DS 


3X 




Address 


VSPIDAW2 


DS 


IF 




Contains 


VSPSIZE 


EQU 


(*- 


VSPLCTL) /8 


Size in 


VSPBOFSZ 


EQU 


(200)/8 


Size in 



Field Description, Contents, Meaning 



address of user CCW 

aticn (DCHH) of current page buffer 

address of page buffer 

remaining in current buffer 

ment in buffer of next record start 

e count of indirect data address CCW 

to SFBLCK for file 

user CCW 

of a buffer area 

es according to caller 

data address work flag 
of indirect data list 

IDAW2 
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VSPXBLOK 



YSPXBLOK; YIRTDAL SPOOL EXTENSION BLOCK 

VSPXBLOK serves as an extension to the virtual spool control block (VSPLCTL) . It contains 
the user named destination of the file as well as RSCS tag information used by the Remote 
Spooling Communications Subsystem. 




8 
10 
18 
20 
28 



1 — 


V*1 


1 V*2 1 V*3 


1 V*4 I/////////VSPXSPAR////////////I 


1 VSPXDIST 1 


1 VSPXXDSR 1 






VSPXCHAR 


1 


VSPXFCB 1 






VSPXCMOD 


1 


VSPXOVLY 1 
1 


I 






VSPXTAG 


1 
1 

I 



Hexadecimal Field 
Displacement Name 



4 

8 

10 

18 
1C 
20 
24 



28 



VSPXLEN 


DS 


IX V*1 


VSPXTGLN 


DS 


1X V*2 


VSPXFLSH 


DS 


IX V*3 


VSPXFLG1 


DS 


IX V*4 


Bits defined 


in VSPXFLG1 


VSPXCPYF 


EQU 


X«80« 


VSPXSPAR 


DS 


XLU 


VSPXDIST 


DS 


CL8 


VSPXXUSR 


DS 


CL8 


VSPXCHAR 


DS 


CL4 


VSPXFCB 


DS 


CL4 


VSPXCMOD 


DS 


CL4 


VSPXOVLY 


DS 


CL4 


VSPXSIZ1 


E.QO 


(♦-VSPXBLOK), 


VSPXTAG 


DS 


CL136 



Field Description, Contents, Meaning 

VSPXBLOK length (doublewords) 
VSPXTAG data length (bytes) 
3800 flash count 
3800 flag byte 



If this JDit xs set, multiple copies 
can be sent in one transmission 

Reserved for IBM use 

Virtual device distribution code 

Virtual machine user to whom the file is 

transferred 
3800 character arrangement table 
3800 forms control buffer 
3800 copy modification 
Name of flash overlay to be used 



Tag application data area 



VSPXSIZ2 EQO (*-VSPXBL0K)/8 VSPXBLOK size in doublewords 
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XINTELOK 



XIHTELOK: EXTERNAL INTERROPT BLOCK 



XINTELOK saves the various types of external interrupts that are presented to the virtual 
nachine. If multiple external interrupt conditions are simultaneously presented, as 
indicated by values presented in the block, code exists for handling the interrupts in 
their defined hierarchical order. The VMPXINT field of the VMBLCK points to XINTELOK. 



r 1 

I XINTNEXT I XINTSCRT | XINTCPOA | 
I 1 

8 I XINTCODE I XINTMASK | XINTEARM | 

L 1 



Hexadecimal Field 

Eisplacement Name Field Description, Contents, Heaning 



XINTNEXT DS 1F Address of next external interrupt block 

4 XINTSORT BS 1H Left half of interrupt collating key 

6 XINTCPOA DS 1H Right half of interrupt collating key 

8 XINTCODE DS 1H External interrupt code 

A XINTMASK DS 1H Control register mask (bits 16-31) 

C XINTPARM DS IF External interrupt parameter word 

XINTSIZE EQD (*-XINTBLOK) /8 XINTELOK size in doutlewcrds (X'02») 
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X0BR3211 

X0EB32i1: EXTENDED OUTBOARD RECORDING BLOCK 

XOBR3211 is appended to the lOERELOK to contain sense data and other data associated with 
I/O errors and error recovery for devices that generate more than 2U bytes of sense 
information. 



50 
58 
60 
68 
70 
78 



X0BRCCH1 



X0BRCCW2 



X0BRCCH3 



X0BRCCW4 



X*1 I X*2 I 



XOBRMISI 



X0ERBIS2 



X0BR512 



I 

278 I 



XOBR180 



I 

330 I 
I 



XOER010 I 

I 1 

I/////////////////XCERVS 1///////////////// I 



Hexadecimal Field 
Displacement Name 



50 


XOBRCCWI DS 


ID 


58 


X0ERCCW2 DS 


ID 


60 


X0BRCCW3 DS 


1D 


68 


X0BRCCW4 DS 


1D 


70 


XOBRFLAG DS 


IX 




Bits defined 


in XOERF 




XOERTI EQO 


X'80» 




X0ERT2 EQO 


X'UO' 




X0BRT3 EQO 


X»20» 


71 


XOBRSTAT DS 


IX 



Field Description, Contents, Meaning 

CCl? used to read OER inforaation 
CCW used to read OER information 
CCW used to read OER infcrBaticn 
CCW used to read OER information 
X*1 Outboard recording flag byte 



T1 Buffer type information present 
T2 Buffer type information present 
T3 Buffer type information present 

X*2 Outboard recording status byte 



Bits defined in XOERSTAT 



X0BRRT1 


EQO 


X'80» 


Perform 


routine 


1 


in 


error 


module 


X0BERT2 


EQO 


X»40» 


Perform 


routine 


2 


in 


error 


module 


X0BRRT3 


EQO 


X»20« 


Perform 


routine 


3 


in 


error 


module 


X0BRRT4 


EQO 


X»10» 


Perform 


routine 


4 


xn 


error 


iscdule 


X0BRRT5 


EQO 


X'08« 


Perform 


routine 


5 


m 


error 


module 


X0BRRT6 


EQO 


x«oa» 


Perform 


routine 


6 


in 


error 


module 


X0ERRT7 


EQO 


X»02» 


Perform 


routine 


7 


in 


error 


module 


X0ERRT8 


EQO 


X«01» 


Perform 


routine 


8 


m 


error 


module 



Section 1. CP Data Areas and Control Blocks 135 



XOBR3211 



Hexadecimal Field 
DisplaceneDt Name 



72 


X0BBMIS1 


DS 


1H 


74 


X0BRMIS2 


DS 


1F 


78 


XOBR512 


DS 


CL512 


278 


XOER180 


DS 


CL18U 


330 


XOBR010 


DS 


CLIO 


33A 


X0BRS71 


DS 


CL6 






ORG 


XOBR180 


278 


XOBR150 


DS 


CL150 



XOBRSIZE EQD 
XOBREXT EQU 



Field Description, Contents, Heaning 

Used fcy the error routine 

Used by the error routine 

Space for OSCB data 

Space for FCB data 

Space for first ten error characters 

Reserved for IBH use 

Redefinition for PLB check 
Space for PLB check data 

(*-I0ERBL0K)/8 Size of lOER and XOBR in dcublewords (X«67») 
(*-X0BRCCWl)/8 Size of X0BR3211 in doutlewcrds (X«5E») 
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Section 2. CMS Data Areas and Control Blocks 



This section contains CMS data areas and control blocks, 
relationships between the control blocks and data areas of CHS. 



Figure 2 shows the 



OToncr 



600 


V(FVS) 


V(OPSEOT) 


608 


V(DEVTAB) 


V(FSTLKP) 1 


610 


V{DMSINM) 


V(FSTLKW) 1 


618 


V(PIE) 


V(IADT) " 


620 


V(USERSEOT) 


V(DMSDIOR) 


628 


V(DMSSCNN) 


A(0) 


630 


V(TABEND) 


V(SUBSEOT) 


638 


A(0) 


V(DMSDIOW) 


640 


V(DIVISSMNST) 


V{ADTSECT) 


648 


V(FREE) 


V(FRET) 


650 


V(DMSPIOOO) 


V(PGMSEOT) 


658 


V(IOSECT) 


V{DMSDBD) 


660 


V(DIOSEOT) 


V(DMSABNUA) 


668 


V(DMSERL) 


V(DMSORD) 


670 


V{DMSFREB) 


V(SVCSECT) 


678 


V(ADTLKP) 


V{DMSAUDUP) ' 


680 


A(0) 


V(OSRET) 


688 


V(CMSRET) 


V(DMSSONO) 


690 


V(DMSEXO) 


V(DMSLDRA) 


698 


V(ADTLKW) 


V(USABRV) 


6A0 


V(EXTSECT) 


V(SCBPTR) 


6A8 


A(0) 


H'O' I H'O' 


6B0 


VfDMSLAF) 


V(DMSLAFNX) 


6B8 


y(DMSLAFFE) 


V(DMSLAFFT) 


600 


V(ADTNXT) 


V(DMSTRK) 


608 


V(DMSTRKX) 


V(DMSTQQ) 


6D0 


V(DMSTQQX) 


V(DMSERS) 


6D8 


V(TYPSROH) 


V(DMSAUD) 


6E0 


V{KILLEX) 


V(DMSFNST) 


6E8 


V(DMSBRD) 


V(DMSBWR) 


6F0 


V(DMSFNS) 


V(DMSSTTE) 


6F8 


V(DMSSTTW) 


V(POINT) 



Legend: 

The projection of SYSREF is a 

sampling of areas within NUOON. 



DiVISNUC 



USERSECT 



SUBSECT 



TSOBLKS 



DMSERL 



OPSECT 



FCBIO 



DBGSECT 



USABRV 



SYSNAMES 



DMSABW 



DMSFRT 



DMSERT 



CMSCVT 



FVS 



DIOSEOT 



SVOSECT 



PGMSEOT 



lOSEOT 



AFTSEOT 



ADTSEOT 



DEVTAB 



RURTBL 



DOSOON 



AVSAMSYS 

Termindl Buffer and Saveareas 

^SYSREF 

FREELIST 

MAINLIST 

TXTDIRL 

MAODIR 

PREOMND 

LASTOMND 

SYSNAME 

INSTALID 

SYSTEM ID 



r 



Free Storage > 



OMSOB 



OBDOBPT 



lOBEOBPT 




DOB 



DECB 




OMSAVE 



LDRST 



)► NUOON 
(See Legend) 



Figure 2. CHS Control Block Relationships 
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AETAE 



AETAB: ABEND TERM IN AT ION OPTION TABLE 

AETAE contains one 8-byte entry for the background partition. Bytes 0-3 contain the 
address of the entry point of the user's abnormal termination routine. Bytes 4-7 contain 
the address of a 72-byte save area used by the supervisor to store the interrupt status 
information and the contents of the general registers. The IJBAETAE field in the SYSCCH 
block in the DOSCON CSECT of NDCON points to the AETAE block. 



1 






1 


1 


ABROOT 1 


AESAVE 


1 


1 _ — 






J 



Hexadecimal Field 
Eisplacement Name 



ABRODT 
ABSAVE 



DC 
DC 



F»0» 
F'0» 



Field Description, Contents, neaning 

Address of user termination routine 
Address of supervisor save area 



ABTAB 



EQD 



*-8 



Abend option table 
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AEWSECT 



AEWSECT; ABEHD RECOVERY WORKSPACE 

AEHSECT describes the fields used for saving registers and other data during abend' 
recovery. ¥-constants in DHSABN, DMSDBG, BHSERE, DHSITI, DHSITP, and EKSITS point to the 
AEWSECT block. AEWSECT is defined in module DHSAEW. 



AENREGS 



40 I 

I 

48 I 



AEBPSW 



ABNRR 



90 I 



ABNPAS13 



Hexadecinal Field 
Eisplacement Nane 




40 
48 
4C 



AENREGS DS 16F 

ABNPSW CS D 

AENRR DS E 

AENPAS13 DS 18F 



Field Description, Contents, Heaning 

Registers at time of abend 
PSW at time of abend 
Temporary save area 
Area passed to nucleus routines 



94 
4C 



Space for DMSERR PLIST 

ORG ABNPAS13 
ABKERLST DS 47X 
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AETSECT 



AETSECT: ACTIVE DISK TABLE 

AETSECT describes the attributes of virtual disks (A-G, S, Y, Z) accessed by a virtual 
machine via the ACCESS coamand. Space is allocated for the ADT when DHSHDC is assembled. 
In the ADT, certain fields are defined for use ty both CMS and OS. For example, ADTHBCT 
field at displacement 1C (hexadecimal) into AETSECT is also defined as CSAETVTA for use 
by OS simulation routines. ADTSECT is invoked by the AET macro. 



8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 



1 ADTID 1 A*1 1 A*2 | 


1 ADTPTR 1 ADTDTA | 


1 ADTFDA 1 ADTBEDM | 


1 ADTMFDA | ADTHECT | 


1 ADTFSTC 1 ADTCHBA | 


1 ADTCFST 1 ADT1ST | 


1 ADTNDM 1 ADTDSEE | 


1 ADTLEFT | ADTLAST | 


1 ADTCYL 1 A*3 | A*4 | A*5 | A*6 | 


1 ADTMSK 1 ADTQQH | 


1 ADTPQMI 1 ADTPQB2 | 


1 ADTPQM3 1 ADTLHBA | 


1 ADTLFST 1 AETNACW | ADTRES | 


1 ADTXNREC | ADTXAREC | 

L — 1 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Meaning 



Nee de d for Read-only Disks and Read/grite Disks 
ADTID DS CL6 Disk~identif ier (label) 

ADTFLG3 DS IX A*1 Third flag byte 



liis defined in ADTFLG3 
ADTFDPDI EQD X»80' 





ADTFXCHN 


EQO 


X«40» 




ADTFRWOS 


EQD 


X»20' 




ADTFSORT 


EQO 


XMO« 




ADTFORCE 


EQD 


X»08» 




ADTFNOAB 


EQO 


X'04' 


7 


ADTFTYP 


DS 


IX 


8 


ADTPTR 


DS 


1A 


C 


ADTDTA 


DS 


1A 


10 


ADTFDA 


DS 


1A 


14 


ADTN 


DS 


IF 


18 


ADTMFDA 


DS 


1A 


1C 


OSADTVTA 


DS 


OF 


1C 


ADTHBCT 


DS 


IF 



First half of DMSADD has been called 
Extra chain link (s) to be returned 
Read/write CS or DOS disk 

All FST hyperblocks and EST entries sorted 
CMS/ECS/OS disk forced to a read-only 
For EMSADE routine: Do not abend 
if it is a disk error 

A*2 Filetype flag byte 

Pointer to next ADT block in chain 
Device table address in HDCCN 
File directory (PSTAT) address 
Number of doublewords in master 

file directory 
Master file directory address 
VTOC address of OS pack 
FST hyperblcck count 
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ADTSECT 



Hexadecimal Field 
Displacement Name 



20 


ADTFSTC 


DS 


IF 




24 


OSADTFST 


DS 


OF 




24 


ADTCHBA 


DS 


1A 




28 


OSADTVTB 


DS 


OF 




28 


ADTCFST 


DS 


IF 




2C 


ADT1ST 


DS 


IF 




30 


OSADTDSK 


DS 


OF 




30 


ADTHDM 


DS 


IF 




34 


0SADTSV1 


DS 


OF 




34 


ADTDSED 


DS 


IF 




38 


ADTLEFT 


DS 


1F 




3C 


ADTLAST 


DS 


IF 




40 


ADTCYL 


DS 


1F 




44 


ADTM 


DS 


1C 


A*3 


45 


ADTMX 


DS 


1C 


A*4 


46 


ADTFLG1 


DS 


1X 


A*5 




Bits def; 


Lned 


in ADTFLG1 






ADTFSF 


'eqd 


X'80« 






ADTFRO 


EQO 


X'40' 






ADTFRW 


EQD 


X«20' 






ADTFFSTF 


EQD 


XM0» 






ADTFFSTV 


EQD 


X»08' 






ADTFQQF 


EQD 


X»04» 






ADTROX 


EQD 


X»02« 






ADTFMIN 


EQD 


X«01» 





47 



AFTFLG2 DS 

Bits defined 
ADTFMFD EQD 
ADTFALNM EQD 
ADTFALTY EQD 
ADTFMDRO EQD 
ADTFALMD EQD 
ADTFALDF EQD 

ADTPSTM EQD 
ADTFROS EQO 
ADTFDOS EQD 



IX 



Field Description, Contents, Beaning 

Number of FST 40-byte entries (files) 

Address of first OS FST 

Pointer to current FST hyperblock 

Dpper VTOC address of OS pack 

Displacement of current FST entry 

Displacement of first word in bit mask with 

"hole" 
OS disk address (cuu) 
Number of records (NDMTRKS) 
Save area 

Number of records in use (QTDSEDP) 
Number of records left (QTLEFTP) 
Displacement of last nonzero byte in bit mask 
Number of cylinders en disk (KDKCYLP) 
Mode letter (A^B,-C, . , = -S-Y-Z) 
Extension-of-mode letter (A,E,C, .. . ,S,Y,Z) 
First flag byte 



ADT block in free storage 
CHS read-only disk (attached and ready) 
CHS read/write disk (attached and ready) 
First FST hyperblock is in free storage 
FST hyperblccks are of varying lengths 
20C-byte QQBSK is in free storage 
This disk has read-only extension (s) 
ADT block is minimum size 

A*6 Second flag byte 



in ADTFLG2 

X»80» HFD is in storage 

X'40' All filenames are in storage 

X'20' All filetypes are in storage 

X'10' nodes 1 through 5 are in storage 

ADTFMDRO*X*08' All modes (0 through 5) are in storage 

ADTFHFD+ADTFALNM+AETFALTY+ADTFALHD 

All DFD is in storage 
X'02» ADT ESTAT chain modified 

X'04' Indicates this is an OS disk 

X*01« Indicates this is a DOS disk 



48 


ADT2ND 


DS 


OD 


48 


Needed for Read/Write 
ADTHSK DS 1A 


4C 


ADTQQH 


DS 


1A 


50 


ADTPQM1 


DS 


IF 


54 


ADTPQH2 


DS 


IF 


58 


ADTPQM3 


DS 


IF 


5C 


ADTLHBA 


DS 


1A 


60 


ADTLFST 


DS 


IF 


64 


ADTNACH 


DS 


1H 


66 


ADTRES 


DS 


1H 



68 



Disks 



800-byte (PQHSK) bit-mask address 
200-byte (PQQHSK) bit-mask address 
PQHSIZ eguals number of bytes in PQHSK is 

greater than 215 
PQHNDH equals number of 80C-byte records for 

PQHSK 
RONDK equals number of doublewords in PQHSK 
Pointer to last FST hyperblock (see Note) 
Displacment of last FST in last hyperblock 

(see Note) 
Number of active write files — halfword 
Reserve count (RESHVCNT) — halfword 



Note; Applies to all CHS disks except for the S-disk 
ADTXNREC DS 1F 



Number of doublewords of extra chain link 
records 
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AETSECT 



Hexadeciaal Field 
Displacement Name 



6C 



ADTXAREC DS 



ADTLBM 
ADTLDM 

ADTLB 
ADTLD 



EQD 
EQD 

EQO 
EQD 



IF 



Field Description, Contents, Meaning 
Address of block of extra chain link records 



ADT2ND-ADTSECT Length of minimum ADT block (in bytes) 



ADTLBM/8 

♦-ADTSECT 
(ADTLB*7)/8 



Qiher Parameters 
ADTRL EQO 800 
ADTMXBML EQO 10 



Length of minimum ADT block in dcublewords 

Length of full ADT block (in bytes) 
Length of full ADT block in dcublewords 



Logical record length 

Maximum bit map length (number cf records) 
for 3330 



NDCON Device Table Displacements 



DTAD 


EQO 





DTADT 


EQD 


3 


DTAS 


EQO 


4 



Device number 
Device type byte 
Symbolic device name 
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AFTSECT 



AITSECT: ACTIVE FILE TABLE 

AETSECT is used to describe a file currently open for a read or write. The AFT is created 
when a file is opened- Space for up to five AFTs is available in DPSBOC; any others must 
reside in free storage. AFTSECT is invoked via the AFT macro. 



1 AFTCLD 


1 AFTCLN 


1 


AFTCLA 


1 AFTDBD 


1 AFTDBN 


1 


AFTEEA 






AFTCLB 





8 
10 



60 
68 
70 
78 
80 
88 
90 
98 
AO 



1 A*1 1 AFTPFST 1 


AFT IN 1 


AFTID 1 
1 


1 AFTFCLA 1 


AFTFCLX 1 


1 

AFTCLDX 1 


1 A*2 I/////I AFTOCLDX 1 /////////////////////////// t 


1 AFTN ! 


1 AFTT 1 
1 , , •.,,.,., • 


1 AFTD 1 


AFTflP 1 


AFTEP 1 


I AFTH 1 AFTIC | 


AFTFCL 1 


A*3 1 A*4 1 


1 AFTIL ! 


AFTEEC 1 


AFTYB 1 


1 AFTADT 1 
i_ _ -...._ _,. 


AFTPTR 


- .- .- .... 1 



Hexadecimal Field 
Displacement Name 







A4 

A8 

14C 

150 

1F4 

1F8 

29C 

2A0 

344 

348 




2 
4 
8 
A 
C 
10 



Active File Table Block 



AFTSTART ES 


OD 


DC 


41F»0* 


DC 


A(* + 4) 


DC 


41F'0» 


DC 


A(* + 4) 


DC 


41F«0' 


DC 


A{*9-4) 


DC 


41F«0» 


DC 


A(* + 4) 


DC 


41F'0» 


DC 


A{0) 


DC 


2F'0» 



Active File Table 
AFTCLD DS H 



AFTCLN 


DS 


H 


AFTCLA 


DS 


F 


AFTDBD 


DS 


H 


AFTDBN 


DS 


H 


AFTDBA 


DS 


F 


AFTCLB 


DS 


XL80 



Field Description, Contents, Meaning 

First AFT block 

Second AFT block 

Third AFT block 

Fourth AFT block 

Fifth AFT block 

Address of next AFT block (in free storage) 

Reserved for IBM use 



Disk address of current chain link 

Number of current chain link 

Address of chain link buffer 

Disk address of current data block 

Number of current data block 

Address of current data block 

Chain link buffer from first chain link 
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AFTSECT 



Hexadecinal 


Field 






Displacenient 


Naie 






60 


AFTFLG 


DS 


X 




Bits def 


ined 


in AFTFLG 




AFTUSED 


EQO 


X'80» 
X«40» 




AFTICF 


EQD 


X«20' 




AFTFBA 


EQO 


XMO» 




AFTDBF 


EQO 


X«08» 




AFTBRT 


EQO 


X»04» 




AFTRD 


EQO 


X»02» 




AFTFDLD 


EQO 


X»01» 


61 


AFTPFST 


DS 


3X 


64 


AFTIN 


DS 


H 


66 


A FT ID 


DS 


H 


68 


AFTFCLA 


DS 


F 


6C 


AFTFCLX 


DS 


H 


6E 


AFTCLDX 


DS 


H 


70 


AFTFLG2 


DS 


X 




Bits def 


ined 


in AFTFLG2 



A8 



Field Description, Contents, Meaning 
A*1 Flag tyte 



Active file table tlock in use 

Reserved for IHE use 

First chain link in storage 

Full buffer assigned 

Data block in storage 

Active write 

Active read 

Full disk special case 

Pointer to (static) FST entry 

Current item nuober 

Displacement of current item in data block 

Address of first chain link 

Disk address of swapped FCL 

Disk address of swapped chain link 

Second flag byte 



A*2 



AFTNEW EQD X»80' 

AFTOLDCL EQO X»40» 

AFTCLX EQO X'20» 

SAHLEN EQO X'01' 



71 




DS 




IX 




72 


AFTOCLDX 


DS 




1H 




74 




DS 




F 




78 


CO£2 of 
AFTFST 


FST 
DS 


Block Emb€ 
CD 


idded i 


78 


AFTN 


DS 




D 




80 


AFTT 


DS 




D 




88 


AFTD 


DS 




F 




8C 


AFTHP 


DS 




H 




8E 


AFTEP 


DS 




H 




90 


AFTM 


DS 




H 




92 


AFTIC 


DS 




H 




94 


AFTFCL 


DS 




H 




96 


AFTFV 


DS 




C 


A*3 


97 


AFTFB 


DS 




X 


A*4 


98 


AFTIL 


DS 




F 




9C 


AFTDBC 


DS 




H 




9E 


AFTYR 


DS 




H 




AO 


AFTADT 


DS 




F 




A4 


AFTPTR 


DS 




F 






Bit defined 


in 


AFTPTR 





AFTLB 
AFTLD 



DS 

EQO 
EQO 



OD 

*-AFTSECT 
AFTLB/8 



New file 

Current chain link existed previously 
Alternate chain link assigned/implied 
Force same length update 

Reserved for IBH use 

Old value (if any) of AFTCLDX 

Reserved for IBB use 



Filename 

Filetype 

Date/time last written 

Write pointer (item no.) 

Read pointer (item no.) 

Filemode 

Item count 

First chain link 

Fixed (F) /variable (V) flag 

FST flag byte 

(Haximum) item length 

800-byte data block count 

Year 

Pointer to active disk table 

Pointer to next AFT block in chain 



Indicates in free storage 

End of DSECT 

Length of AFT block in bytes 
Length of AFT block in doublewords 
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ANCHSECT 

AHCHSECT; ANCHOR TABLE 

ANCHSECT defines the DOS/VS anchor table- This DSECT is used by DHSDCS when a CDLOAD 
(SVC 65) is issued, and the phase is not found in either the CBSVSAM or CHSAMS segment. 
In this case, the specified phase is loaded either fron a CMS DOSLIB or a ECS core image 
library, and the name, load point, entry point, and the length in bytes, of the phase are 
saved in an available slot in the anchor table. ANCHSECT is invoked by the ANCHTAE 
macro. 



10 
18 
20 

L 



r 


ANCHENDA 


1/////////////////////////// 1 

, , , . ' 




ANCHCBS 


1 


ANCHOAL 1 

1 


1 ANCHPHNM 1 
1 i 




ANCHLDPT 


1 


ANCHENTP 1 


1 A*1 


1 ANCHPHLN 


1 





Hexadecimal Field 
Eisplacement Name 






ANCHENDA DC 


A(0) 


4 


DC 


F«0» 


8 


ANCHCBS DC 


A(0) 


C 


ANCHOAL DC 


A(0) 



Field Description, Contents, Meaning 



End address of anchor table 

Reserved for IBM use 

Pointer to VSAM AMCB table 

Pointer to VSAM OAI (OPEN ACE) table, which 

is followed by one or more Anchor 

Table entries 





Anchor Table 


Entries 


and 


Their Format 


10 


ANCHPHNM DC 


CL8« » 




Phase name 


18 


ANCHLDPT DC 


A(0) 




Load point 


1C 


ANCHENTP DC 


A(0) 




Entry point 


20 


ANCHSTSW DC 


X«00« 




A*1 Status switch 




Bits ucf ineu 


in ANCBS 


TSW 





ANCHMLOD EQO X«00» 

ANCHINST EQO X»7F' 

ANCHRPJL EQO X'FF* 

ANCHLENG EQU 20 

ANCHSIZ EQU 1024 



Phase must be loaded 

Phase is already in storage 

Requested phase just loaded by another task 

(only if AP=YES) 
Length of one anchor table entry 
Default size of anchor table (in bytes) 



21 



ANCHPHLN DC 



AL3(0) 



Length of phase in bytes 
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EATLSECT 146 BBOX 



EATLSECT: CMS BATCH DSER JOB LIMITS 



EATLSECT aescribes the fields in the user job limits table for CMS batch jobs. 
AEATLIMT field in NUCON points to EATLSECT. 



The 



I BATCPOL I BATCPOC 



I EATEHTL | BATPBTC 



8 I BATPONL I BATPUNC 



Hexadecimal Field 
Eisplacement Name 






BATCPUL 


DC 


H«32767« 


2 


BATCPOC 


EC 


H»0' 


4 


BATPRTL 


DC 


H«32767' 


6 


BATPRTC 


DC 


H«0' 


8 


BATPUNL 


DC 


H»32767' 


A 


BATPONC 


DC 


H'O' 



Field Description, Contents, Meaning 



Virtual processor limit (in seconds) ; can be 

reset 
Current processor count; dc not reset 
Number printed lines limit; can be reset 
Current line count; do not reset 
Number punched cards limit; can be reset 
Current card count; do not reset 



EEOX: BOUNDARY BOX 

EEOX contains the begin and end addresses of the virtual and real partitions, 
respectively. The IJBBOX field in the SYSCOM tloclc in the DOSCCN CSECT of NOCON points 
to the BBOX block. 



REALORP 



EEALNEP 



VIRTOHP 



VIRTENDE 



Hexadecimal Field 
Eisplacement Name 






REALORP DS 


XL4 


4 


REALNDP DS 


XL4 


8 


VIRTORP DS 


XL4 


C 


VIRTENDP DS 


XL4 



laaaies for Fields in BBOX 
ALTSDAR EQD REALORP 



MINREALP EQO 
MPGEPOOL EQO 
ORIGVIRT EQO 
FINVIRT EQO 



REALNDP 
REALNDP+2 
VIRTORP 
VIRTENDP 



Field Description, Contents, Meaning 

Origin of real partition 

End of real partition +1 

Origin of virtual partition 

End cf virtual partition +1 



Address of alternate area 

No, page frames in minimum real partition 

No. page frames in main page pool 

Origin of virtual storage 

End cf virtual storage +1 
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EGCOM 



BGCOH: DOS/VS PARTITION COBHUNICATIGN REGION 



EGCOM simulates the DOS/VS Partition Communicaticn Region (BGCOH) 
HDCON points to the BGCOH block. 



The ABGCOM field in 



10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 
90 
98 



r" ■ ' — - 


JOBDATE 


1 

I 

, 1 


1 PPBEG 1 


EOSSP 1 


1 
1 


1 j DPSI 1 


i COHNAHE 1 


! PPEND 


! HIPHAS 


1 
1 


1 HIPROG 


1 LAELEN 


PIK 1 


1 EOCADR 


1 A*1 1 A*2 


A*3 1 A*4 1 


1 A*5 1 A*6 1 


A*7 1 A*8 1 DALC 


FCCLPT 1 


1 PUBPT 1 


FAVPT 1 JIEET 


TEEPT 1 


1 FICLPT ! 


NICLPT 1 LDEET 


A*9 1 ! 


1 MHED 


1 YYDEE 




1 LIOCSCOH 1 


PIBPT 1 CHKETIE 


JCBZCN 1 


! DIBPT 1//////////////! PCPIB 


ITPTE 1 


1 OCPT 1 


PWTIMS 1 //////////// 


LTK 1 


1 SYSPAR 


1 JAPART 




1 TOECOM 


1 PIE2PTR 


PDTAEB 1 


1 IJLQTTAD 


! BGCCHPT 


A*10 1 A*11 1 


1 COMEX 


1 A*12 1 A*13 


A*14 1 1 




PROCNAM (cont. fron 8F) 


1 A*15 \ 


I 


POVNAH 


I A*16 1 

- J 



Hexadecimal Field 
Eisplacement Name 






JOBDATE 


DC 


C 00/00/00' 


8 


PPBEG 


EC 


S(0) 


A 


EOSSP 


DC 


S(0) 


C 




DC 


11X«00» 


17 


DPSI 


DC 


x»oo» 


18 


COHNAME 


EC 


CL8«CHS/D0S« 


20 


PPEND 


DC 


A(0) 



Field Description, Contents, Keaning 

Job date 

Supervisor end 

End cf storage protection 

User scratch area 

DPSI byte 

Job name 

Highest storage address of partition 
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EGCOM 



Hexadeciial 


Field 








Eisplacement 


Nane 








24 


HIPHAS 


DC 


A(0) 




28 


HIPROG 


DC 


A(0) 




2C 


LABLEN 


DC 


H»0' 




2E 


PIK 


DC 


X»0010« 




30 


EOCADR 


DC 


A(0) 




3H 


CONFIG 


DC 


B' 11101000* 


A*1 


35 


LTACT 


DC 


B»00010000» 


A*2 


36 


S0B1 


DC 


B'11000100' 


A*3 


37 


S0B2 


DC 


BM1011010* 


A*4 


38 


JCSW1 


DC 


BM1010000' 


A*5 


39 


JCSW2 


DC 


B'OOOOOOOO' 


A*6 


3A 


JCSH3 


DC 


BM1000100» 


A*7 


3B 


JCSH4 


DC 


B»10000000» 


A*8 


3C 


DALC 


DC 


H»0» 




3E 


FOCLPT 


DC 


S(0) 




40 


POBPT 


DC 


S(0) 




42 


FAVPT 


DC 


S(0) 




44 


JIBPT 


DC 


S(0) 




46 


TEBPT 


DC 


S(0) 




48 


FICLPT 


DC 


S(0) 




4A 


NICLPT 


DC 


S(0) 




4C 


LUBPT 


DC 


S(0) 




4E 


SYSLINE 


DC 


AL1 (56) 


A*9 


4F 


SYSDATE 


DS 


0CL9 




4F 


HMDD 


DC 


XL4»00» 




53 


YYDDD 


DC 


XL5'00» 




58 


LIOCSCOM 


DC 


2X»00« 




5A 


PIBPT 


DC 


S(0) 




5C 


CHKPTID 


DC 


H»0» 




5E 


aOBZQJJ 


DC 


S (0) 




60 


DIBPT 


DC 


S(0) 




62 




DC 


H«0» 




64 


PCPTR 


DC 


S(0) 




66 


ITPTR 


DC 


S(0) 




68 


OCPT 


DC 


S(0) 




6A 


PBTIMS 


DC 


X»000C» 




6C 




DC 


H«0» 




6E 


LTK 


DC 


S(0) 




70 


SYSPAR 


DC 


F«0» 




74 


JAPART 


DC 


F»0» 




78 


TODCOM 


DC 


A(0) 




7C 


PIB2PTR 


DC 


S(0) 




7E 


PDTABB 


DC 


S(0) 




80 


IJLQTTAD 


DC 


A(0) 




84 


BGCOHPT 


DC 


S(0) 




86 


OPTNBYTE 


DC 


X»00« 


A*10 


87 


RHSROPEN 


DC 


B'OOOOOOOO* 


A*11 


88 


COHEX 


DC 


A(0) 




8C 


STDOPT 


DC 


B'OIOOOOOO* 


A*12 


8D 


TEMOPT 


DC 


8*01000000' 


A*13 


8E 


DISKCONF 


DC 


X»00« 


A*14 


8F 


PROCNAM 


EC 


CL8» » 




97 


PSWTCH 


EC 


X'O' 


A*15 


98 


POVNAM 


DC 


CL7* • 




9F 


INSIZE 


DC 


X»0' 


A*16 



Field Description, Contents, Meaning 

End address of last phase loaded 

End address of longest phase leaded 

Length of problem prograi label area 

Program interrupt Xey 

End of virtual storage address 

Machine configuration byte 

System configuration byte 

Standard language translator options 

Standard supervisor options 

Job control byte 

Linkage control byte 

Nonstandard language translator options 

Job duration indicator byte 

Disk address of volume label 

Address of FOCL 

Address of PUB 

Address of FA7P 

Address of JIB 

Address of TEB 

Address of FICL 

Address of NICL 

Address of LOB 

SYSLST line count 

System date 

HMEE or DDMM 

YYEEE portion of date 

LICCS communication bytes 

Address of PIB 

Last checkpoint number 

Joi zone itt minutes 

Background DIB pointer 

Reserved for lEH use 

PC option table 

IT option table 

OC option table 

Key of program with IT support 

Reserved for IBH use 

Logical transient key 

Address of SYSPAHB 

Address of job accounting table 

Address of TOD communications area 

Address of PIB extension 

Address of HICF DTF table 

Address of QTAB vector table 

Address of background COHBEG 

Option indicator byte 

System configuration byte 2 

Pointer to SYSCOM option table 

Standard job control option byte 

Temporary job control option byte 

Disk configuration byte 

Procedure name 

Interface byte for catalog procedure 

Save area for statement name 

81-byte SYSIN indicator 
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CMSTAXE 



Ci5STAXE: TERMINAI: ATTENTION EXIT ELEMENT 

CHSTiXE defines the fields used in a Terninal Attention Exit Element (TAXE) . The TAXE is 
used mainly by DMSCIT for processing attention interrupts. CHSTAXE is invoked via the 
TSOBLKS macro. The TAXEADDS field in NOCON points to CeSTAXE. 



TAXESPSW 



TAXEEXIT 



8 I 

I 

10 I 



TAXELNK 



TAXEICL 



TAXETSOF 



TAXEETNA 



18 



TAXEEXTS 



(Variable Length) 



60 I 



TAXEICWS 



(Variable Length) 



88 I 
I- 



TAXETAIE 



90 I /////////////////////////// I 



TAXEOSER 



1 



98 |//TAIEHSGL//I/A*1/I////////I 

I 

AO I TAIERSAV 



TAIEIAD 



(Variable Length) 



Bezadecinal Field 
Eisplacement Name 



TAXESPSW DS 
TAXEEXIT DS 
TAXESTAT DS 



IF 

A 
OX 



Field Description, Contents, Meaning 

Left half PSW for ATTN return 
ATTN exit address 
Status of exit return 



8 
C 
10 
14 
18 
60 



8C 
90 
94 
94 



98 
9A 
9B 
9C 
AO 



TAXEFREQ EQD X»80' 

TAXELNK DS A 

TAXEIOL DS IF 
TAXE TSOF DS IF 

TAXERTNA DS A 

TAXEEXTS DS 18F 

TAXEIOHS DS 11F 



ATTN exit taken 

Next TAXE on queue 

Left half of I/C old PSW 

TSO flags saved here 

Return address 

ATTN exit routine save area 

DMSICW save area 



llso Attention Exit Parameter List 

TAXETAIE DS A Address of TAIE 

DS IF Reserved for IBM use 

TAXEDEF DS OX Defer indicator 

TAXEDSER DS A Dser PLIST address 

Ter mina l Attention Interrupt Element (TAIE) 



TAIEMSGL 


DS 


2X 


TAIETGET 


DS 


IX 




DS 


IX 


TAIEIAD 


DS 


A 


TAIERSAV 


DS 


16F 



Reserved for IBM use 
A*1 Reserved for IBM use 
Reserved for IBM use 
Right half of I/O old PSW 
Registers 0-15 of interrupted program 
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CVTSECT 



CVTSECT: COMMUNICATION VECTOR TABLE AS SDPPOBTEE EY CMS 

G7TSECT simulates the OS CoiBunication Vector Table. CVTSECT is invoked via the CMSCVT 
macro. The ACMSCVT field in NUCON points to CMSCVT. 



I //////////// I CVTMDL I 
I 

8 I 



40 I 



78 I 

I 

80 I 

I- 

88 I 



AO I 



E8 I 



I 
108 I 



Not supported 



CVTDATE 



Not supported 



58 I CVTEXIT I CVTBRET | 
I 1 



CVTR13 



CVTNDCB 



CVTAVIB 



Not supported 



I A*1 I 



Not supported 



CVTMZOO 



Not supported 



I CVTOPTA 



Not supported 



CVTOSER 



Not supported 
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CVTSECT 



Hexadeciaal 


Field 






Displacement 


Name 











DC 


H«0» 


2 


CVTMDL 


DC 


H»0» 


a 




DC 


CL4»Cx.x« 


8 


CMSCVT 


DS 


OD 


8 




DC 


14F»-1» 


40 


CVTDATE 


DC 


PL4»0« 


44 




DC 


3F«-1» 


50 




DC 


A(0) 


54 




DC 


F»-1» 


58 


CVTEXIT 


DC 


XL2«0A03» 


5A 


CVTBRET 


DC 


XL2'07FE» 


5C 




DC 


8F'-1' 


7C 


CVTDCB 


DC 


XL1«40» 


7D 




DC 


FL3»-1» 


80 


CVTR13 


DC 


F'O' 


84 




DC 


F»-1» 


88 


CVTNUCB 


DC 


A(0) 


8C 




DC 


8F'-1' 


AC 


CVTMZOO 


DC 


A(0) 


BO 




DC 


3F'-1' 


BC 




DC 


XL2«00« 


BE 


CVTOPTA 


DC 


XL2»00» 


CO 




DC 


2F»-1» 


C8 




DC 


3A(0) 


D4 


CVTDSER 


DC 


F»0» 


D8 




DC 


12F'-1» 


108 


CVTAVIB 


DC 


V(DMSVIB) 



Field Description, Contents, Meaning 

Reserved for IBH use 

Processor identification and model number 
CMS release number (latest release level) 
CVT start 
Not supported 

Current date in packed decimal 
Not supported 
Not supported 
Not supported 
A SVC 3 instruction (exit) 
A ECB 15,14 instruction 
Not supported 
A*1 System configuration = PCP 
Not supported 
Rl3 saved during OPEN 
Not supported 

Lowest storage address not in nucleus 
Not supported 

Highest storage address in machine 
Not supported 
Not supported 
Bit 7: extended precision floating point 

hardware in processor 
Not supported 
Not supported 
Field available to user 
Not supported 
Address of VSAM interface bootstrap 
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EEGSECT 



EEGSECT: DEBUG WORK AREA 



EEGSECT contains the files used by DEBUG for saving registers, breakpoints, PSWs, and 
other data. V-constants in DMSDBD, DMSDBG, and EHSITE point to the DEEUG work area. 



I 

I 

8 I 



CCWPRINT 



SYHTAELE 



108 I 
I 



SYMTBG 



BRKPHTBL 



I 

188 I 

I 

190 I 



TELEBD 



ARGS 



1B8 
ICO 
1C8 
1D0 
1D8 
1E0 
1E8 
1F0 
1F8 
200 
208 





JFLAGS 




1 A*1 1 


WAITRD 


1 WTRDCBT 


ORG 1 


DEC 


DECDEC 


ARGSAV 




1 


RETSAV 


EXAMLC 




1 


EXABLG 


BEGAT 




1 


STOFAT 


SAVE1 




1 


SAVE2 



DBGSAV1 



I 

248 I 



DBGSAV2 
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DBGSECT 



288 
290 

298 

2A0 

2A8 



A*2 I 
1 



TSYH 



XPSW 



LINE 



LINE1 



300 I 
308 I- 



320 
328 
330 
338 
340 
348 
350 
358 
360 



I A*3 I 

...■. J 



LINEA1 









1 A*4 


1 A* 


5 1 








PLIST 


for DMSCWR 








1 1 A*6 


INPDTSIZ 1 1 


CONHCT 


HEX 1 


HEXHEX 


1 BITS 



tr 



I A*7 



380 1 ////////////////////////IPS V////////////////////////// 



388 I //////////TBLINDX////////// 1////ECB///// I ////////////// 



390 |/A*8// |/A*9/ I/A* 10/l/A* 1 1// I/////////EEGXWK//////////// 



398 IDBGXWK(Ccnt) I ////////////// I 

I 
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EEGSECT 



Hexadecimal 
Displacement 



Field 
Name 



Field Description, Contents, Meaning 



1B8 



1BE 



1C0 
1C0 
1C8 
ICC 
1CD 
ICE 

1D0 



ENTRY DBGSECT 
CCWPRINT CCW X»09',0,SILI,133 



Printer CCW for DEBDDKF 



8 


SYHTABLE 


DS 


32D 


108 


SYMTBG 


DC 


F»0« 


10C 


BRKPNTBL 


DC 


16F'0,-1» 


18C 


TBLEND 


DC 


A(TBLEND) 


190 


Storage i 


and Constants fo 
~DS OD 


190 


ARGS 


DS 


5D 




MVCNTi 


EQU 


♦-ARGS 




MVCNT 


EQD 


I1VCNT1-8 




ARGHAX 


EQO 


* 



JFLAGS 



DS 



6X 



ARGSCT 


DS 


IX A 


MVCNT2 


EQD 


♦-ARGS 




DS 


OD 


WAITRD 


EC 


CLB'HAITRD* 




EC 


A(INPDT) 




DC 


C»D' 




DC 


X»00» 


WTRDCNT 


DC 


H»0' 



ORG 



DC 



F'O' 



Dser-defined symbol table 
Symbol table entries 
Breakpoint table 
End address of breakpoint table 



Arguments stored here 

Number of bytes in arguments 
Needed for SET GPR command 
End of argument area 

Flags corresponding to arguments. There is 
one flag for each parameter, as follows: 

00 = Numeric (0 - 9) 

FO = Hexadecimal (A - F, 0-9) 

FF = Alphabetic (A - F) 

A*1 Number of arguments in command line 

For initializing to zero 

Parameter list to get input line 

A (input buffer) 

Clean up and logical carriage return 

Byte count filled in here 

Origin of routine being examined 



The Followina Variables Are Used b^ DEBOG and DEBDDHP 



1D8 


DEC 


DS 


ID 


1E0 


DECDEC 


DS 


ID 


1E8 


ARGSAV 


DS 


IF 


1EC 


RETSAV 


DS 


IF 


1F0 


EXAHLC 


DS 


1F 


IFU 


EXAHLG 


DS 


IF 


1F8 


BEGAT 


DS 


IF 


1FC 


STOPAT 


DS 


IF 




LASTLINE 


EQO 


DECDEC 


200 


SAVE1 


DS 


1F 


204 


SAVE2 


DS 


IF 


208 


DBGSAV1 


DS 


16F 


248 


DBGSAV2 


DS 


16F 



Binary word 
Decimal word 

Storage for argument location 
Storage for return address 
First location to be examined 
Length of field to be examined 
Beginning parameter being processed 
Last parameter location 

32 bytes for last line dumped 

DEBEOHP uses this area for line count 

DEBOG EALR-call save 

Save area for CCNWAIT/COHREAE 
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DBGSECT 



Hexadecimal Field 
Eisplacement Name 



Field Descripticn, Contents, Meaning 



288 
298 
2A0 
2A1 
2AC 
303 
304 
324 
325 



328 
328 
330 
334 
337 

338 
33a 
33C 
340 
348 
34C 
350 
358 
359 



TSYM 

XPSi 

0UTPT1 

LINE 

LINE1 

LINE1B 

LINEIA 

LINE1C 

LINE1D 

DBGOUT 

INPDT 

INPDTl 

CONWR 



CONHRL 



CONHCT 
HEX 

HEXHEX 

BITS 



DS 
DS 
DC 
DC 
DC 
DC 
DC 
DC 
DC 

EQD 
EQD 
EQD 

DS 
DC 
DC 
DC 
DC 



INPOTSIZ DS 
DS 
DC 
DC 
DS 
DC 
DS 
DC 
DC 



4F 

ID 

IC ' 

CL11» ' 

87X'40' 

C»*i 

32X»40' 

C'*' 

X«40' 

LINE 
LINE 
LINE+60 



A*2 



A*3 

A*4 
A*5 



Symbcl entry 
Execution PSW 
Byte count 
I/O tuffer 
Filler bytes 
Filler bytes 
Filler bytes 
Filler bytes 
Filler bytes 

Output buffer 
Input buffer 
Hexadecimal pack area 



OD 

CL8«TYPLIN» 

AL1 (1) ,AL3 (DBGOOT) 

CL1»B»,AL2(0) 

AL1<0) A*6 



PLISI for DKSCWB to type output line 
PLIST continued 
PLIST continued 
PLIST continued 
PLIST continued 



Size of typed-in input line 
Reserved for IBM use 



1H 

1H 

F«0' 

X'FAFBFCFDFEFFOOOO' Translate table 

IF Binary word 

X»FFFFFFFF« Fence 

2F Printer graphic word 

X'FF* Extra translate byte 

X»COCOCOCOCOCOCOCO« Scratch word 



361 
36F 
379 



ORG 

DC 

DC 



*+14 Translate table 

C»0123456789» Translate table 






:ranslate 



37F 



CONHXT 



EQO 



DBGSiTCH DC 



CONHCT-C»A' 



X'OO* 



A*7 Internal EEEDG status flags 



380 
388 
38C 
38E 
390 
391 
392 
393 



394 
39A 



Bits def 


iS§^ is DBGSHTCH 






X»80' 
X»40« 




DBDEXIT 


EQD 


X»20' 




DBDDMSG 


EQD 


X»10» 




DBG SET 


EQD 


X»08» 




DBGPERM 


EQD 


X»04' 




DBGCOND 


EQO 


X'02« 




The Following 


are Res 


sery; 


YPSW 


DS 


D 




TBLINDX 


DS 


F 




BCR 


NOPR 









NOPR 







ILC 


DS 


1C 




ILC11 


DC 


X»06» 




ILC0110 


DC 


X»04' 




ILCOO 


DC 


X«02» 




BAL 


EQD 


X»45' 




BALR 


EQD 


X'05« 




DBGXWK 


DS 


3H 






LPSW 


48 





Reserved for IBM use 

Reserved for IBM use 

Exit from DIBDDMP 

Duplicate message in DEBDDEE 

SET command 

Reserved for IBM use 

Reserved for IBM use 



PSW containing HSI 

Current ERKPT table index 

NOPR to pad DBGXWK when needed 

Additional NOPR (if needed) 
A*8 ILC of instruction in DBGXBK 
A*9 3 halfword instructions (6 bytes) 
A*10 2 halfword instructions (4 bytes) 
A*11 1 halfword instructions (2 bytes) 

EAL operation code 
EALR operation code 

Re-create instruction at BRKPT address 

Give control to NSI 
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EEVSECT 



EEVSECT: DEVICE TABLE DSECT 



EEVSECT describes the device information required for input/output routines, 
a DSECT corresponding to the data in a DEVTAE entry. 



DEVSECT is 



I DEVADDR 

I 

8 I DEVIPRA 
I 



I D*1 I D*2 I 



DEVNAME 



EEVMISC 



Hexadecimal Field 
Displacement Name 






DEVADDR 


DS 


1H 


2 


DEVFLAG 


DS 


IX D*1 


3 


DEVTYPE 


DS 


IX D*2 


4 


DEVNAME 


DS 


IF 


8 


DEVIPRA 


DS 


1F 


C 


DEVMISC 


DS 


IF 




DEVSIZE 


EQD 


*-DEVSECT 



Field Description, Contents, Meaning 



Virtual device address 

Device flags 

Device type 

Symtclic device name 

Interrupt processing routine address 

Miscellaneous — device dependent 

Device table size (in bytes) 



156 IBM VM/370 Data Areas and Control Block Logic 



DEVTAE 



EJVTaE: DEVICE TABLE 

EEVTAB contains the entries for the various devices handled by CMS (disks, tapes, reader, 
punch, printer, and console) . DEVTAB is pointed to by V-constants in TMSICB and DMSITI, 
and is also referenced indirectly by the AEEVTAE field in NDCOS. 



10 
20 
30 
40 
50 
60 
70 
80 



AO 



CONSOLE 



ADISK 



BDISK 



CDISK 



DDISK 



EDISK 



FDISK 



GDISK 



SDISK 



YDISK 



ZDISK 



BO 
CO 
DO 



FO 
1CC 

lie 

12C 
130 

lac 

150 



BEADEBI 



PDNCH1 



PBIUTEBI 



EEADEB2 



PDNCH2 



FBISTEB2 



TAPE1 



TAPE2 



TAPE3 



TAPEU 



DDMHY 



Hexadecimal Field 
Displacement Name 






CONSOLE 


DS 


OD 







DC 


XL2»009» 


2 




DC 


XL2'0» 


4 




DC 


CL4»C0N1' 


8 




EC 


VL4 (CONSI) 


C 




DC 


XL4«0' 


10 


ADISK 


DS 


OD 


10 




DC 


XL2«191' 


12 




DC 


XL2»0' 


14 




DC 


CL4«DSK1« 


18 




DC 


AL4(0) 


1C 




DC 


XL4'0» 


20 


BDISK 


DS 


OD 


20 




DC 


XL2«000' 


22 




DC 


XL2'0' 


24 




DC 


CL4'DSK2» 


28 




DC 


AL4(0) 


2C 




DC 


XL4»0' 


30 


CDISK 


DS 


OD 


30 




DC 


XL2'000« 


32 




DC 


XL2»0» 



Field Description, Contents, Eeaning 
Device table entry for console 



Device table entry for A-disk 



Device table entry for B-disk 



Device table entry for C-disk 
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EEVTAE 



Hexadecisal 


Field 






Eisplaceaent 


Name 






34 




DC 


CL4'DSK3' 


38 




DC 


AL4 (0) 


3C 




DC 


XL4'0' 


40 


DDISK 


DS 


OD 


40 




DC 


XL2M92' 


42 




DC 


XL2»0» 


44 




DC 


CL4'DSK4» 


48 




DC 


AL4(0) 


4C 




DC 


XL4'0' 


50 


EDISK 


DS 


OD 


50 




DC 


XL2'000' 


52 




DC 


XL2»0' 


54 




DC 


CL4»DSK5» 


58 




DC 


AL4(0) 


5C 




DC 


XL4»0» 


60 


FDISK 


DS 


OD 


60 




DC 


XL2«000' 


62 




DC 


XL2'0' 


64 




DC 


CL4»DSK6' 


68 




DC 


AL4{0) 


6C 




DC 


XL4'0» 


70 


GDISK 


DS 


OD 


70 




DC 


XL2'000» 


72 




DC 


XL2»0' 


74 




DC 


CL4'DSK7' 


78 




DC 


AL4(0) 


7C 




DC 


XL4»0' 


80 


SDISK 


DS 


OD 


80 




DC 


XL2«190' 


82 




DC 


XL2»0» 


84 




nc 


CL4»DSK8' 


88 




DC 


AL4(0) 


8C 




DC 


XL4'0' 


90 


YDISK 


DS 


OD 


90 




DC 


XL2M9E» 


92 




DC 


XL2'0» 


94 




DC 


CL4'DSK9» 


98 




DC 


AL4(0) 


9C 




DC 


XL4»0' 


AO 


ZDISK 


DS 


OD 


AO 




DC 


XL2'000» 


A2 




EC 


XL2'0» 


A4 




DC 


CL4»DSK0' 


A8 




DC 


AL4(0) 


AC 




DC 


XL4'0» 


BO 


READER1 


DS 


OD 


BO 




DC 


XL2'00C« 


B2 




BC 


XL2'0» 


B4 




DC 


CL4'RDR1» 


B8 




DC 


AL4(0) 


BC 




DC 


XL4'0' 


CO 


P0NCH1 


DS 


OD 


CO 




DC 


XL2'00D» 


C2 




DC 


XL2'0« 


C4 




DC 


CL4'PCH1' 


C8 




DC 


AL4(0) 


CC 




DC 


XL4^0' 


DO 


PRINTER1 


DS 


OD 


DO 




BC 


XL2»00E» 


D2 




DC 


XL2»0' 


D4 




DC 


CL4*PRN1' 


D8 




DC 


AL4 (0) 


DC 




DC 


XL4»0» 



Field Description, Contents, Meaning 



Device tahle entry for D-disk 



Device tatle entry for E-disk 



Device table entry for F-disk 



Device table entry for G-disk 



Device table entry for S-disk 



Device table entry for Y-disk 



Bevice table entry for Z-disk 



Bevice table entry for REAEEEl 



Bevice table entry for PDNCH1 



Bevice table entry for PHINTEBl 
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DE7TAE 



Sexadecimal 


Fieia 






Displacement 


Name 






EO 


READER2 


DS 


OD 


EO 




EC 


XL2«012« 


E2 




DC 


XL2»0» 


E4 




DC 


CL4*RDR2' 


E8 




DC 


AL4 (0) 


EC 




DC 


XL4»0« 


FO 


PDNCH2 


DS 


OD 


EO 




DC 


XL2»013' 


F2 




DC 


XL2«0« 


FU 




DC 


CL4«PCH2' 


E8 




DC 


AL4(0) 


FC 




DC 


XL4'0« 


100 


PRINTER2 


DS 


OD 


100 




DC 


XL2»010« 


102 




DC 


XL2'0' 


104 




DC 


CL4»PRN2« 


108 




DC 


AL4(0) 


IOC 




DC 


XL4»0» 


110 


TAPE1 


DS 


OD 


110 




DC 


XL2M81' 


112 




DC 


XL2'0' 


114 




DC 


CL4«TAP1' 


118 




DC 


AL4(0) 


lie 




DC 


XL4»0' 


120 


TAPE2 


DS 


OD 


120 




DC 


XL2«182' 


122 




DC 


XL2»0» 


124 




DC 


CL4»TAP2' 


128 




DC 


AL4(0) 


12C 




DC 


XL4»0« 


130 


TAPE3 


DS 


OD 


130 




DC 


XL2M83' 


132 




DC 


XL2'0' 


134 




DC 


CL4»TAP3' 


138 




DC 


AL4(0) 


13C 




DC 


XL4»0» 


140 


TAPE4 


DS 


OD 


140 




DC 


XL2M84' 


142 




DC 


XL2'0» 


144 




DC 


CL4'TAP4« 


148 




DC 


AL4(0) 


14C 




DC 


XL4'0» 


150 


DDMHY 


DS 


OD 


150 




DC 


XL2«000» 


152 




DC 


XL2»0' 


154 




DC 


CL4»XXXX' 


158 




DC 


AL4(0) 


15C 




DC 


XL4'0« 


160 


TABEND 


DS 


OD 



Field Description, Contents, Heaning 
Device tatle entry for REAEER2 



Device tatle entry for PDNCH2 



Device tatle entry for PRIl<iTER2 



Device tatle entry for TAP11 



Device tatle entry for TAPE2 



Device tatle entry for TAPE3 



Device tatle entry for TAPE4 



Device tatle entry for DUHKY 
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EIOSECT 



£IQSECT: DISK I/O WORK AREA 



CIOSECT describes the fields used by DMSDIO as a work area when reading and writing 
actual blocks of data on CMS disks. DIOSECT is pointed to by a V-constant in DMSHOC, and 
referenced indirectly by ADIOSECT in NDCON. 



r 




lOOLD 




1 DIOCSW 






PHAIT 






1 
1 


QQESK1 


1 CCW1 


1 CCH1A 


1 CCW2 


1 CCW3 


1 RWCCH 






SEEKADR 


1 SECTHDM 




LASTCYL 


1 


LASTHEC 


1 A*1 


1 A* 2 l 
, J 


SENSE 





8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 



78 
80 
88 
90 



SENCCW 



DOUBLE 



XRSAVE 



C8 
DO 
B8 
EO 
E8 







1 

1 


1 ERRCODE 




FREERO 


1 


EICFREE 


1 SAVEADT 1 






CCHX 




1 A*3 


1 A*4 1 A*5 1 
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DIOSECT 



Hexadecimal 
Eisplaceient 



Field 
Nane 



10 
10 
18 
1C 
20 
24 



28 
30 
38 
UO 
48 

50 

57 



58 
5C 

60 

61 



62 
7C 
80 



88 



90 
CC 
CF 



DO 
D4 

D8 
EO 
E8 
19 
EA 



DIOSECT DSECT 
lOOLD DC 1D»0» 
DIOCSS DC 1D'0» 

PLIST TO Call DHSIOW 





DS 


OF 


PWAIT 


DC 


CL8«WAIT» 




DC 


C'DSK-' 




DC 


F'0» 




DC 


F'O* 


QQDSK1 


DC 


F'0» 


QQDSK2 


EQU 


QQDSK1+2 


CCS Chai 


r\ 





CCw I CCW 

CCHIA CCW 

CCW2 CCW 

CCW3 CCW 

RWCCW CCW 

SEEKADR DC 

SECTNUM DC 

I/O Information 
LASTCYL ~DC 
LASTHED DC 

DEYTYP DC 

DIOFLAG DC 



Bits defined in DIOFLAG 
TOOBIG EQD X»OU» 
WRTKF EQD 
QQTRK EQD 



DIAGNDM EQD 

SENSE 

SENCCW 



DC 
DS 
CCW 



Field Description, Contents, Meaning 



I/O eld PSW (from interrupt routine) 
CSW (from interrupt routine) 



Filled in to correct symbolic disk number 

First two bytes are always 

Halfword copy of 16tb track disk address 



X'07«, SEEKADR, X'iiO', 6 Seek 

X«03»,0,X'40»,1 Seek or set sector 

X»31«,SEEKADR+2,X«40',5 Search 

X»08»,*-8,0,1 TIC back to search 

X«00»,*-*,X'20»,*-* Read or write data 



Seek/search information (first 3 bytes are 0) 
Sector number 

Becomes last cylinder number used 
Becomes last head number used 

A*1 01=2311, 08=2314, 09=3330 

A*2 RDTK/WRTK flag: 

Byte count is greater than 800 
Writing first chain link 
Handling first chain link 

Number assigned by CP for DIAGNOSE I/O 

Sense information 



XL7»00» 


X" 


'00* 


I 
F' 


'0' 


F' 


'0» 


X' 


'00» 


X' 


iOO» 



X»02» 
X«01» 



24 



XL24'00« 

OF 

X»04», SENSE, X'20', 24 READ 24 BYTES SILI 



Miscellaneous Storage 

DODBLE DC ID'O' (Scratch area, for C7D use, etc.) 

5S®I the Following Three in Order 

XRSAVE DS 15F Registers 0-14 saved here for RDTK/WRTK 

DC AL3 (0) First 3 bytes of Rl5 error code 
ERRCODE DC AL1(*-*) Error code (in Rl5 at exit) 

Keep the Following Two in Order 

FREERO DC F^O* No. cf doublewords of free storage (if any) 

DIOFREE DC F»0' Address of free storage for buffer or CCWs 



SAVEADT DC 

CCWX CCW 

DIAGRET DC 

lOCOMM DC 

LASTREC DC 



F'O' Handy place for an ADT address 

X«23',SECTNDM,X»40',1 Set sector 

X'OO* A*3 CP's DIAGNOSE return code if nonzero 
X»00' A*4 Set to read (06) or write (05) 



X'OO' 



A*5 Number (1-14) of the last record processed 
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DMSCCB 



EMSCCB: COMMAND CONTROL BLOCK 



EMSCCE describes all fields of a DOS Coimand Control Block (CCB) . This ESECT is used by 
DMSXCP to map the CCB specified by a user for an SVC (EXCP) and passes the address of 
CCB to DMSXCP. 



10 



18 



20 



28 



30 



38 



r- ■— — - 

1 CCBCNT 1 A*1 1 J 


1*2 1 A*3 1 A*4 1 A*5 | A*6 | 


1 A*7 1 CCBCCW 


1 A*8 1 CCECSW 1 


1 CCBLDATB 


1 CCBLCCHE i 

1 


I///////////////////////////I A*9 1 CCEFSCCW | 


1 CCERDCCW 


1 CCBWTCCii 1 


1 CCBLHCCW 


1 /////////////////////////// 1 


1 /////////////////////////// 1 /////////////////////////// 1 


1 CCBNCCB 

1 - ... - . -- .. 


1 /////////////////////////// 1 

_j 



Hexadecimal Field 
Eisplacement Name 





CCBST EQU 


* 




CCBB EQD 


* 





CCBLEN DS 


0CL16 





CCBCNT DS 


XL2 


2 


CCBERMAP DS 


oxm 


2 


CCBCOMI DS 


XL1 




Bits defined 


in CCBCO 




CCBWAIT EQD 


X'80» 




CCBEOF EQD 


x»ao« 




CCBIOERR EQD 


X'20» 




CCBERROK EQD 


XM0» 




CCBRDC EQD 


X»08« 




CCBPDE EQD 


X«04' 




CCBDCV EQD 


X»02» 




CCBDERR EQD 


X»01» 


3 


CCBC0M2 DS 


XL1 




Bits defined 
CCBDCCNT EQD 


in CCBCO 
X»80' 




CCBTRKOV EQD 


X'40' 




CCBEOC EQD 


X»20» 




CCBDC EQD 


X»10» 




CCBNOREC EQD 


X'08' 




CCBRETRY EQD 


x'oa* 




CCBVER EQD 


X'02' 




CCBCC EQD 


X'01' 



Field Description, Contents, Meaning 

Start CCB 

Command control block 

Bap Cf the rOS CCB 
Residual count 

Four bytes used to check errors 
A*1 Communications byte 1 



Traffic bit (set at CE) 
End cf file 

Onrecoverable I/O error 
Accept unrecoverable error 
Return data checks 
Post at device end 
Return data check RD/CHK 
Dser error routine 

A*2 Communications byte 2 



Data check in count area 

Track overrun 

End cf cylinder 

Data check 

No record found 

Retry no record found 

Verify error 

Command chain (retry) 
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DMSCCB 



Hexadecimal Field 
Displacement Name 



CCBCSW1 


DS 


XL1 


Bits def: 


ined 


in CCECS 


CCBATTN 


EQD 


X»80» 


CCBSTMOD 


EQD 


X«40» 


CCBCDE 


EQO 


X«20» 


CCBBDSY 


EQD 


X«10« 


CCBCE 


EQU 


X»08» 


CCBDE 


EQU 


X»04» 


CCBUC 


EQD 


X«02» 


CCBUE 


EQD 


X»01» 


CCBCSW2 


DS 


XL1 



Field Description, Contents, Heaning 
A*3 CSW status tit 1 



Attention 
Status modifier 
Control unit end 
Busy 

Channel end 
Device end 
Dnit check 
Dnit exception 

A*4 CSi status tit 2 





CCBILEN 


EQD 


X»40« 






CCBPROGM 


EQD 


X»20« 






CCBPROT 


EQD 


X»10» 






CCBCHAND 


EQD 


X»08» 






CCBCHANC 


EQD 


X«04« 






CCBICTRL 


EQD 


X»02' 






CCBCHAIN 


EQD 


X«01« 




6 


CCBSYMD 


DS 


0XL2 




6 


CCBSDCLS 


DS 


XL1 


A*5 


7 


CCBSONOM 


DS 


XL1 


A*6 


8 


CCBLI0B3 


DS 


XL1 


A*7 


9 


CCBCCW 


DS 


XL3 




C 


CCBC0M3 


DS 


XL1 


A*8 



CCBAPEND EQD X«40» 



D 


CCBCSW 


DS 


XL3 


10 


CCBLDATB 


DS 


A 


14 


CCBLCCiB 


DS 


A 


18 




DS 


F 


1C 


CCBDFLGS 


DS 


X 



A*9 



Bit§ defined in CC B DFLGS 
CCBDEAIC EQD x'^SO'" 
CCBDEAC EQD X'40» 
CCBDRDCW EQD X*20* 
CCBRPS EQD XMO» 



1D 


CCBFSCCW 


DS 


XL 3 


20 


CCBRDCCW 


DS 


F 


24 


CCBHTCCK 


DS 


F 


28 


CCBLUCCH 


DS 


F 


2C 




DS 


3F 



Prograffl-controlled interrupt 
Incorrect length 
Program check 
Protection check 
Channel data check 
Channel control check 
Interface control check 
Chaining check 

Symhclic unit (SYSDN) 

D - LDB class 

N - LDB numter within class 

Reserved for LICBS 

Pointer to start of channel program 

Communication byte 3 

Appendage exit at interrupt 

Pointer to CSW or to appendage routine 
Address of last data block 
Address of last CCi tlock 
Reserved for IBM use 
I/O manager CCB flags 



Error analysis in control 
Error analysis complete 
Read CCW active 
RPS channel program candidate 

Save area for first CCW address 
Address of first read CCW 
Address of first write CCW 
Address of the last write CCW 
Reserved for IBK use 



38 
3C 



Note; CCBLiCCW chain field must have the same displacement as does FCBCHAIN 
in~FCDB and also EKPFSTBK in BKPRD 



CCBNCCB 



DS 
DS 



Address of next CCB tlock 
Reserved for IBM use 
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EOSSECT 



EOSSECT: DOS SIMULATION CONTROL BLOCK 



EOSSECT simulates the CHS Pile Control Block (FCE) in the CMS/DOS envircnient. DOSSECT 
is invoked by the DOSCB macro^ 

The DOS Sinulation Control Blocks are chained together. The DOSriBST field in HUCCH 
points to the first DOSCB in the chain, or if no chain exists, contains zero. 




8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 



1 DOSNEXT 


1 


DOSCBID 


! DOSDD 


1 DOSOP 


1 DOSDSNAM 


1 DOSDSTYP 


1 DOSDSMD 1 DOSITEM | 


EOSBDFF 


1 DOSBYTE 


1 DOSEORM 1 DOSCODT 


1 DOSREAD 


1 A*1 


1 A*2 1 DOSBLKSZ 


1 DOSHORK 


1 A*3 1 A*4 1 A*5 


1 A*6 1 


DOSCSFST 


1 DOSOSDSN 




D0S70LTE 


1 DOSEXTTB 


1 DOS 


SENSE 1 A*7 t A*a 


1 DOSBOFSP 




DOSDCNAH 


1 DOSDCNAM (cont.) 


f 






DOSSAVE 





80 I 



I 1 

I A* 9 I A* 10 I ///////////// I 
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DOSSECT 



BexadeciiDal 
Eisplacement 




4 
8 
10 
18 
18 
20 
28 
2A 
2C 
30 
34 
36 
38 
3C 



3D 

3E 

il A 
t W 

48 
48 
49 
4A 
4B 

fi r« 

50 
54 
58 
5C 
5E 
5F 
60 
64 
6C 
84 
85 
86 
88 



Field 
Nane 



DOSINIT DS 



OX 



Bits defined in DOSINIT 



DOSOS 


EQD 


X'40* 


DOSDOS 


EQO 


X'20' 


DOSCMS 


EQD 


XMO* 


DOSDDCAT 


EQD 


X«08» 


DOSPERM 


EQD 


X'04» 


DOSJCAT 


EQD 


X«02» 


DOS OCA T 


EQD 


X«01« 


DOSNEXT 


DS 


A 


DOSCBID 


DS 


CL4 


DOSDD 


DS 


CL8 


DOSOP 


DS 


CL8 


DOSTAPID 


DS 


OX 


DOSDSNAM 


DS 


CL8 


DOSDSTYP 


DS 


CL8 


DOSDSMD 


DS 


CL2 


DOSITEM 


DS 


H 


DOSBOFF 


DS 


F 


DOSBYTE 


DS 


F 


DOSFORM 


DS 


CL2 


DOSCODT 


DS 


H 


DOSREAD 


DS 


F 


DOSDEV 


DS 


X 


Bits def ; 


Lned 


in DOSDEV 



A*1 



DOSDDM EQD 
DOSDSK EQO 20 



DOSTAPMD 


DS 


X 


DOSBLKSZ 


DS 


H 


DOSSORK 


DS 


T) 


DOSYSXXX 


DS 


OH 


DOSSYS 


DS 


IX 


DOSXXX 


DS 


IX 


DOSEXT 


DS 


IX 


DOSEXTCT 


DS 


IX 


DOSOSFST 


DS 


X' 


DOSOSDSN 


DS 


F 


DOSVOLTB 


DS 


F 


DOSEXTTB 


DS 


F 


DOSSENSE 


DS 


H 


DOSVOLNO 


DS 


X 


DOSEXTNO 


DS 


X 


DOSBDFSP 


DS 


F 


DOSDCNAM 


DS 


CL8 


DOSSAVE 


DS 


6F 


DOSEXTCX 


DS 


IX 


DOSTYPE 


DS 


1C 




DS 


H 


DOSEND 


DS 


OD 



A*2 



A*3 
A*4 
A*5 
A*6 



A*7 
A*8 



A*9 
A*10 



Field Description, Contents, Meaning 
DOSCE flag tyte 



OS user-created bit 
Defined for non-CHS disk 
Defined for CHS disk 
Dser catalog data set 
PersBanent control tlcck 
Search VSAM job catalog 
Search VSAH user catalog 

AL3(next EOSCB) 

DLBL to distinguish from CKSCE 

Data definition name 

CMS operation 

Tape identification 

Data set name 

Data set type 

Data set mode 

Item (record) number 

A (input/output buffer) 

Size of buffer (data count) 

File format: fixed/variable 

Records per CHS physical block 

Number of bytes actually read 

Device type code 



Dummy device 
Disk 

Tape mode set to save 

Block size 

Work area 

Logical unit for CMS/DOS 

SYS/PROG unit: X»00«=SYS, X»C1»=PRCG 

Number from 000-255 associated with the unit 

Number of DCS extents left to process 

Current DCS extent 

Pointer ■''O CS FST 

Pointer to CS dsname block 

A (volume ID table) — VSAM multivclume data set 

A (extent table) for VSAM data space 

I/O sense data 

No. cf volumes (entries in DOSVOLTB) 

No. cf extents (entries in DOSEXTTB) 

Size of VSAK I/C buf f er (s) 

VSAM user catalog ddname 

Temporary save area for re-entrant code 

Current extent (used by DMSXCP) 

Data set type (SAM=S, VSAM=A) 

Reserved for IBM use 

End address of this block 



DOSENSIZ EQO (*-DOSSECT) /8 Size of block in doublewords 
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EECB 



EDCB: EDIT CONTROL BLOCK 



EDCB is used by all CMS EDIT nodules to define common free storage control blocks. It is 
initialized by DMSEDX, the EDIT bootstrap routine, and built dynamically from user free 
storage each time a user issues the EDIT command. 



FNAHE 



81 
I 



FTYPE 



101 FMODE 
I 

181 Z0NE2 
I 

201 



I A*1 I A*2 I 



TRDNCOL 



Z0NE1 



I VERC0L1 I VERC0L2 | VERLEN 



SCRBDFAD 



CAHDIHCR 



281 LMSTART 

I 



LMINCR 



I A*3 I A*** I 

1 



TABS 



48 1 

I 
501 

I 
581 

I 
601 

♦ 
681 

I 
701 

I 
781 

I 
801 

I 
88 1 

I 
901 



SEQNAME 


1 A*5 1 


PAEBDF 


PADBDF (COnt.) 1 


PTR1 


PTR2 




PTB3 


AEXTEHD 




CORITEH 


SPARES 




FPTR 


ITEM 




AFSTFHRD 


FREELEN 




FREEAD 


EDRET 




EDHSK 



MAINAD 



AOTOREG 



C8| 
I 

DO I 
I 

D8i 
I 

EOl 



CARDNO 


1 


CODNT 


LMCDRR 


BUFFL 


1 


EDFFA 



CANSAV 



1001 



EDALNOS 
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DOaLNOS (cont.) 



EECB 



1r8 i 

I 

2001 



DECIMAL 



U » T T7 

nau£ 



REGSA7E 



210 
218 

220 



REGSAVX 



REPCNT 



SAVEAE 



260 
268 
270 
278 
280 
288 
280 
298 
2A0 
2A8 
2B0 
2B8 
2C0 
2C8 
2C0 



XYCNT 



CHHGNUB 



TIN 



AEDLIN 



ALTHODE (cont.) 



I A*6 I 



TOUT 



1 1 A*7 1 




lOLIST 






IQID 




lOMODE 1 


1 


lOAE 




! BECS 


1 ALILIST 


ALTLIST (cont.) 


1 


EBBOBK 




EDHORK (cont.) | 


1 ALTHODE 



2F0I 
I- 
2F8I 



STACKAT 



STACKAT (cont.) 



3001 



STACKATL 



ATTN 
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EDCB 



308 


r - - - - 

ATTN (cont.) 




1 




■1 


310 


ATTNLEN 




1 




RENLIST 1 


318 


RENLIST (cont.) 




1 




RPLIST 1 


320 






RPLIST 






328 


STRTNO 




1 




INCRNO 1 


330 


AINCORE 




1 




FSIZE 1 


338 






DECLTH 






340 


RANGE 1 


348 


/////////////////////////RESVD 1///////////////////////// 1 


350 


A*8 1 BOFAE 




1 A*9 1 A*10 1 WRCODNT | 


358 


BDFFLOC 








ALINELCC 1 
1 


360 


ANDMLOC 








AFIAGLOC 1 


368 


THNCNDM 






ACIOCNT 1 ADTOCORR | 


370 


CHNGCNT 1 DITCNT 




EICT 


1 LINELOC 1 


378 


NDMLOC 1 SAVCNT 




TVERC0L1 1 TVERCCL2 | 


380 


A*11 1 A*12 1 






AREA 


I 


388 


AREA (cont.) 1 A*13 


1 A*14 1 




CHNGMSG 1 


3ao 


1 

1 


CHGTRUNC 






3A8 


r ~ " " 1 

1 1 

_ 1 1 


3B0 




(uni 


dentif ie 


d) 




3B8 


CMODE 




1 
- ( 






3C0 






FILEMS 


• 
• 



I A*15 I A*16 



3B8I A*17 I 
I 1 



JAR 



I NEHNAME 



428 1 



NEWNAME (cont.) 



I NEWTYPE 



430 



438 



NEWTYPF (cont.) 



I NEWHODE 



I A*18 



SERSAV (cont.) 



I A*19 
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EECE 



440ISERTSEQ (cont) | A*20 | A*21| 
I 1 

4481 



I A*22 I A*23 



460 1 A*24 I A*25 | 
I 



SCLNO 



4681 SCLNO (cent.) | A*26 | A*27 | 
I 

I 



XABEA 



(Same length as EELIN) 



4F8I 



(Same length as EELIN) 



I 
I 

5801 

I 
5881 

I 
5901 

I 
5981 



I 

5A8I I 



I- 



5B0 



EDLIN 



6301 



LINENO 



I A*29 



LINE 



YAEEA 









1 A*28 


XXXCWD 


SAVCiD 




INVLDHDR 


1 


HACRCHER 


MACROHDR (cont) | 


INVLD 1 


MACRC 





I A*30 I 
I 



6E8I 



TABLIN 
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EECB 



Hexadecimal Field 
Displacement Name 

DS 



Field Description, Contents, Meaning 
OF 




8 
10 
12 
13 
14 
16 

18 
1A 
1C 
IE 
20 
24 
28 
2A 

2C 

2D 
2E 



48 
4B 



BLOC EQO 

FNAME DS 

FTYPE DS 

FMODE DS 

FV DS 

CASESH DS 

TRONCOL DS 

Z0NE1 DS 

Z0NE2 DS 

VERCOLI DS 

VE8C0L2 DS 

VERLEN DS 

SCRBOFAD DS 

CARDINCR DS 

LHSTART DS 

LHINCR DS 



FLAG 

FLAG2 

TABS 



DS 
DS 
DS 



ENDTABS EQO 

SEQNAHE DS 
PADCHAR DS 



CL8 Filename 

CL8 Filetype 

CL2 Filemode 

CL1 A*1 Record format 

CL1 A*2 Case setting 

H Truncation column 

H Beginning zone initialized to first 

column 
H End zone 

H Verify column 1 

H Verify column 2 

H Verify length 

F Address of GETHAIS buffer 

F Increment for serialization 

H Where line numbers start 

H Automatic line numbers using default 

increment 

CL1 A*3 Flags for line monitoring 

CLI A*4 Miscellaneous flags 
26AL1 Maximum of 25 tabs is allowed 

* End cf tabs 

CL3 Name, if any, for serialization 

CLI A*5 »0» en right, • • on left 



4C 



ENDBLOC EQO * End of blocks 

Note: PADBDF must remain directly behind PADCHAR 
PADBOF DS 9C Pad characters 



PTRCONS EQO 



58 


PTR1 


DS 


2F 


60 


PTR2 


DS 


F 


64 


PTR3 


DS 


F 


68 


AEXTEND 


DS 


F 


6C 


CORITEM 


DS 


F 


70 


SPARES 


DS 


F 


74 


FPTR 


DS 


F 


78 


ITEM 


DS 


F 


7C 


AFSTFNRD 


DS 


F 


80 


FREELEN 


DS 


F 


84 


FREEAD 


DS 


F 


88 


EDRET 


DS 


F 


8C 


EDMSK 


DS 


F 


90 


MAINAD 


DS 


F 



EPTRCONS EQO 



94 


AOTOREG 


DS 


13F 


C8 


CARDNO 


DS 


F 


CC 


CODNT 


DS 


F 


DO 


LMCORR 


DS 


2F 


D8 


BOFFL 


DS 


F 


DC 


BOFFA 


DS 


F 


EO 


CANSAV 


DS 


9F 


104 


DOALNOS 


DS 


CL240 


1F8 




DS 


OD 


1F8 


DECIMAL 


DS 


F 



EMSEDI line pointers 

Pointer to top of file (for dummy top line) 

Current line pointer 

Pointer to bottom line 

Pointer to end of used area of storage 

Number of bytes for one line in storage 

Number of spare lines 

Free list pointer 

Item length 

Anchor for stacked lines upon entry 

Length of free storage 

Address of free storage 

CMS return address 

DMSSCH edit mask 

LOADSYS address; if LOADBCD 

DMSEEI save areas and buffer pointers 

Autocheck save area 
Save area for sequence number 
Number of characters in EDLIH 
Prompter current line number 
Length of string (EDC) 
Address of string (EEC) 
Register save (EDC) 
Temporary string buffer (EEC) 

Dsed by EECEIN and BINDEC 
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EECE 



Hexadecimal 


Field 






Displacement 


Name 






1FC 


HALF 


DS 


F 


200 


REGSAV 


DS 


5F 


214 


REGSAVX 


DS 


3F 


22 


RBPCNT 


DS 


F 


224 


SAVEAR 


DS 


15F 


260 


XYCNT 


DS 


F 


264 


CHNGNDM 


DS 


F 


268 


TIN 


DS 


OF 


268 




DS 


CL8 


270 




DS 


X 


271 


AEDLIN 


DS 


3X 


274 


CASEREAD 


DS 


C 


275 




DS 


3X 


278 


TOUT 


DS 


OF 


278 




DS 


CL8 


280 




DS 


X 


281 




DS 


3X 


284 




DS 


C 


285 


TYPFLG 


DS 


X 


286 




DS 


H 



288 
288 
290 
298 
2A0 
2A2 
2A4 
2A8 
2AC 
2AE 
2B0 
2E4 
2B4 
2BC 
2C4 
2CC 
2D4 
2DC 
2E4 
2E6 
2EC 
2F4 
2F4 
2FC 
300 
304 
304 
30C 
310 
314 
314 
31C 
328 
32C 
330 
334 
338 
340 
348 
350 
351 
354 



CRBIT 



EQO 



X«80« 



lOLIST 


DS 


OF 




DS 


CL8 


lOID 


DS 


CL8 




DS 


CL8 


lOMODE 


DS 


CL2 




DS 


H 


lOAD 


DS 


CL4 




DS 


F 




DS 


CL2 


RECS 


DS 


H 




DS 


F 


ALTLIST 


DS 


OF 




DS 


CL8 


EDHORK 


DS 


CL8 




DS 


CL8 


ALTMODE 


DS 


CL8 




PS 


CL8 




DS 


CL8 




DS 


CL2 




DS 


CL6 




DS 


8X 


STACKAT 


DS 


OF 




DS 


CL8 




DS 


CL4 


STACKATL 


DS 


F 


ATTN 


DS 


OF 




DS 


CL8 




DS 


CL4 


ATTNLEN 


DS 


F 


RENLIST 


DS 


OF 




DS 


CL8 


RPLIST 


DS 


CL12 


STRTNO 


DS 


F 


INCRNO 


DS 


F 


AINCORE 


DS 


F 


FSIZE 


DS 


F 


DECLTH 


DS 


D 


RANGE 


DS 


D 


RESVD1 


DS 


D 


CHDBLOK 


DS 


X 


BDFAD 


DS 


3X 


FLG 


DS 


X 



Field Description, Contents, Meaning 

EINEEC only edits four characters 

Register save area 

Register save area 

FOR count 

DMSSCR save area 

X or Y execution count 

Number of lines to change 

HAITRE PLIST 

WAITRE 

M» for console No. 1 

A(EELIN) 
A*6 Default to uppercase 

Length put here 

TYPLIN PLIST 

TYPLIN 

M' for console No. 1 

Address goes here 

*B» for black ribbon 
A*7 X*20* maximum length override 

Length goes here 

Suppress carriage return 

Initialization for state of source 

STATI 

EDIT 

CMSDTI 

A1 

Item number for RDBDF 

Do not allow asterisks 

133 (XINSCRIPT use LINE) 

F/V and null record indicator 

1 (XINSCRIPT one line at a time) 

Number of bytes read from BDBDF 

RENAME 

EDIT 

CMSDTI 

A1 

New filename 

New filetype 

**» 

New filemode 

FF fence 

PLIST to stack first in first out 

ATTN 

First in first out 

Length and address of line to stack 

ATTN 

Last in first out 

Length and address of line to stack 

RENDM PLIST 

RENOM 

Fileid 

Starting number 

Increment number 

In-storage copy address 

Record length 

BMSSCR work area 

Message data areas 

Reserved for IBM use 
A*8 X'19» 

Buffer address 
A*9 CCW flag 



Section 2. CMS Data Areas and Control Blocks 171 



EDCB 



Hexadecioal 


Field 








Displacenent 


Naae 








355 


CTL 


DS 


X 


A*10 


356 


WRCOUNT 


DS 


H 




358 


GIOPLIST 


DS 


OF 




358 


BOFFLOC 


DS 


F 




35C 


ALINELOC 


DS 


F 




360 


ANDMLOC 


DS 


F 




364 


AFLAGLOC 


DS 


F 




368 


TRNCSOM 


DS 


F 




1 36C 


AUTOCNT 


DS 


H 




1 36E 


ADTOCURR 


DS 


H 




1 370 


CHNGCNT 


DS 


H 




1 372 


DITCNT 


DS 


H 




1 374 


EDCT 


DS 


H 




1 376 


LINELOC 


DS 


H 




1 378 


NUMLOC 


DS 


H 




1 37A 


SAVCNT 


DS 


H 




1 37C 


TVERC0L1 


DS 


H 




1 37E 


TVERC0L2 


DS 


H 




1 380 


ALCHAR1 


DS 


C 


A* 11 


1 381 


ALCHAR2 


DS 


C 


A*12 


1 382 


AREA 


DS 


CL8 




1 38A 


BYTE 


DS 


X 


A*13 


1 38B 


CHNGFLAG 


DS 


X 


A*14 


1 38C 


CHNGMSG 


DS 


CL20 




1 3A0 




DS 


2X 




1 3A2 


CHGTRONC 


DS 


13X 




1 3AF 




DS 


9X 




1 3B8 


CMODE 


DS 


CL4 




1 3BC 


FILEHS 


DS 


CL26 




1 3D6 


FLAGLOC 


DS 


X 


A*15 


1 3D7 


GETFLAG 


DS 


X 


A*16 


1 3D8 


HOLDFLAG 


DS 


X 


A*17 


1 3D9 


JAR 


DS 


(ENDBLOC- 


■BLOC) 


1 425 


NEHNAHE 


DS 


CL8 




1 42D 


NEWTYPE 


DS 


CL8 




1 435 


NEWHODE 


DS 


CL2 




1 437 


SERSAV 


DS 


CL8 


A*18 


1 43F 


SERTSEQ 


DS 


CL3 


A*19 


1 442 


SERTSW 


DS 


X 


A*20 


1 443 


SIGNAL 


DS 


X 


A*21 


1 444 


TEHPTAB 


DS 


(ENDTABS- 


-TABS) 


1 45E 


UTILFLAG 


DS 


X 


A*22 


1 45F 


XYFLAG 


DS 


X 


A*23 


1 460 


SCRFLGS 


DS 


X 


A*24 


1 461 


SCRFLG2 


DS 


X 


A*25 


1 462 


SCLNO 


DS 


8C 




1 46A 


TWITCH 


DS 


X 


A*26 


1 46B 


TYPSCR 


DS 


X 


A*27 


1 46C 


XAREA 


DS 


H 




1 46E 




DS 


CL135 




1 4F6 


YAREA 


DS 


H 




1 4F8 




DS 


CL135 




1 57F 










1 580 




CNOP 


6,8 




1 586 




DS 


X 




1 587 


BLANK1 


DS 


X 


A*28 


1 588 


XXXCWD 


DS 


CL8 




1 590 


SAVCHD 


DS 


CL8 




1 598 


INVLDHDR 


DS 


CL6 





Field Description, Contents, Heaning 

Control byte 

Write count 

DMSSCR PLIST for DHSGIO 

Buffer location 

Address of line location 

Address of nunber location 

Address of flag location 

Nuiber of lines truncated 

Autosave paraneter 

Current nodification count 

Temporary area for change 

Count of lines stacked by the REOSE (=) 

subroutine 
Next char in EDLIN 
Display line nuaber 
Display count 
Length of last saved request not beginning 

with either a ? or = 
Teiporary area for verifying column 1 
Temporary area for verifying column 2 
Temporary byte used by ALTER 
Temporary byte used by ALTER 
EDIT instruction work 
Temporary byte (used by GET) 
Flag for change 
Lines changed message 
C' 

C»...LIKE(S) » 

C'TRDHCATED' 

Filemode for HODECHK routine 

Retry message 

Flag for EHSGIO 

Flag for GETFILE 

DMSSCR SCRFLGS 
AL1 Save area for preserve 

Name area for FILE and SAVE commands 

Type area for FILE and SAVE commands 

node area for FILE and SAVE commands 

Identification number for save area 

Temporary byte identification number area 

Temporary byte used by identification number 

Signal between routines 
AL1 Temporary spot for new tabs 

DHSSCR utility flags 

X/Y active flag 

Screen function flags 

More screen function flags 

Save LINEMOEE sequence number 

Location flags 

Display unit size index value 

X length and request buffer 

(Same length as EDLIN) 

Y length and request buffer 

(Same length as EDLIN) 



Alignment for XXXCWD 
Alignment for XXXCWD 
A*28 Blank for clearing EDIT XXXCWD 
EDIT token buffer 
Location at which contents of XXXCWD 

are saved 
?EDIT: (for invalid request message) 
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EDGE 



Hexadeciial Field 
Displacement Name 



59E 
5A2 



MACBOHDR DS 
iH¥LD DS 



Field Description, Contents, Meaning 



CL4 EXEC for EDIT macro stacking 

0CL6*?EDIT:» Location to store invalid header 



5A4 



5A8 

5A9 
630 
635 
636 
6D6 
6D7 
778 



MACRO 



EDLIN 

LINENO 

BLANK2 

LINE 

BLARK3 

TAB LIS 

EDCBEND 



ORG 
DS 

ORG 
DS 

DS 
DS 
DS 
DS 
DS 
DS 
DS 



INYLD*2 
0CL4«EXEC« 

HACEO+4 
C 



Location to hold macro header (if invalid) 



CL135 
CL5 
X 
CL160 

V 

CLioO 
OD 



Blank used for clearing EDLIH 

Terminal input tuffer 
Line number for typeout 
A*29 Blank for clearing line 

Current line is held here 

.a: 
Output from spread 



EDCBLTH EQD (EDCBEND-EDCB) Length of EECB in doublewords 
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ERDSECT 



ERDSECT: ERROR HANDLING ROUTINE DSECT 



ERDSECT describes the fields in a work area used for giving responses and error aessages 
via the DMSERR or LINEDIT macros. A V-constant in EMSIRR points to the DHSERT CSECT in 
DMSNDC- 




ERSiVE 



58 ! 

AO 
A8 
BO 
BB 
CO 
C8 
DO 
D8 
EO 



ERPAS13 



A*1 1 A*2 1 




1 


ERPTXA 




ERPNDM 1 


A*3 1 


ERPCS 


1 




ERPBFA 




1 


ERPSEA 




ERSBD 




1 A*4 


1 A*5 1 




ERSSZ 1 




(Double 


word preceding text) 




ERHESS 


1 


ERSECT 


1 


ERNDB 



I- 

160 I 

I 

168 I 



I A*6 I A*7 I 

1 



ERTEXT 



ERTPL 



ERTPLA 



ERTPLL 
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ERBSECT 



Hexadecifflal Field 
Displacefflent Name 






19L^ ilea for 
ERT1 DS 


DMSE 

d"" 


8 


ERT2 DS 


2D 


18 


Save Area 
ERSAVE DS 


16F 


58 


ERPAS13 DS 


18F 



Field Description, Contents, Heaning 



Douileword workspace 

Two doublewords workspace 



Pass this save area in R13 to BALR-ed 
to-routines 



AO 



A1 



A4 
A8 
A8 
AA 
AB 
BO 



B4 
B8 
BC 



Re constructed PLIST Area 
ERPF1 ~ DS B A*1 

Bits defined in ERPF1 



SRF1TX 


EQD 


X»80' 


ERF1HD 


EQU 


X»40» 


ERF1BF 


EQU 


X»20« 


ERFISBI 


EQD 


XMO' 


ERF1SBN 


EQD 


X'08» 



First flag iyte 



Text address in PLIST 

Header in PLXST 

Buffer address in PLIST 

One substitution 

More than one substitution 



ERPF2 



DS 



B 



Bit§ defined in ERPF2 
ERF2CM EQD X«80« 
ERF2DT EQD X»40» 
ERF2DI EQD X»20» 



A*2 Second flag byte 



Blank compression wanted 
Dot at end of line wanted 
HALT=YES wanted 



Last 3 Bits Indicate DISP Field 



ERF2ER 


EQD 





ERF2TY 


EQD 


1 


ERF2SI 


EQD 


2 


ERF2N0 


EQD 


3 


ERF2PR 


EQD 


4 


ERF2CP 


EQO 


5 


ERPTXA 


DS 


A 


ERPHDR 


DS 


0CL6 


ERPNDM 


DS 


H 


ERPLET 


DS 


C 


ERPCS 


DS 


CL3 


ERPBFA 


DS 


A 



ZieMs for 3^>;stitutions 
ERPSBA DS A~" 



ERSBD 
ERSBF 



DS 
DS 



Error message 

Type 

SIO 

None 

Print 

CPCOMM 

Text address 
Error message header 
Message number 
A*3 Message letter 
CSECT name 
Buffer address (for BOFFA) 



Pointer to first (next) group of substitution 

parameter in original PLIST 
Data address and/or value of current 

substitution parameter 
A*4 Flag byte for current substitution parameter 



Bits defined in ERS BF 
ERSFLST EQD X«80» 
ERSFA EQD X»40» 
ERSFL EQD X»20« 



The last substitution parameter 
A-type option 
Length specified 
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ERDSECT 



Hexadeciial Field 
EisplaceDent Naie 



BD 
CO 



Last 3 Bits Give Ojgtion Tj[£e 



ERSFH 

ERSFD 

ERSFC 

ERSFH4 

ERSFC8 


EQD 
EQO 
EQD 
EQO 
EQD 



1 
2 
3 
4 


ERSBL 


DS 


X 


ERSSZ 


DS 


A 



Field Description, Contents, Meaning 



HEX or HEXA 
DEC or DECA 
CHARA 
HEX4A 
CHAR8A 

A*5 Byte length for the current substitution 
paraaeter 
Size of substitution field is nuaber of 
dots linus 1 



C8 
DO 
D3 
D6 
D9 
DA 



DB 



160 
160 
168 
16C 



Msssaae Construction A rea 



Need doubleword before text 
First letters of header 
DSICT name 
Message nunber 
Message level letter 
Blank 

Maxinua text size 

Message text area 



TIPLIN/PR INTER PLIST Construction Area 

DS OF ' " 
ERTPL DC CI8«TYPLIN » 

ERTPLA DS AL1(1) ,AL3(EHMESS) Message text address 
ERTPLL DS C»R»,AL3 Message length 





DS 


D 


ERHESS 


DC 


C«DMS» 


ERSECT 


DC 


C»MMM» 


ERNDH 


DC 


C«NHN» 


ERLET 


DC 


C»L» A*6 


ERBL 


DC 


C» » A*7 


ERTSIZE 


EQO 


130 


ERTEXT 


DS 


(ERTSIZE*1)C 
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EXTSECT 
EXTSECT; EXTERNAL INTERRUPT WORK AREA 

EXTSECT describes the fields in the External Interrupt work area referenced by DHSITE. 
EXTSECT is pointed to by the AEXTSECT field in NDCON. 



I 



EXSAVE 



40 
48 
50 
58 
60 
68 



TYPLIST 



TIMCCW 



TIHCHAR 



SCAW 



TIHINIT 



EXSA7E1 



A8 
BO 
B8 
CO 
rft 



1 EXTPSW 1 


1 SAVEXT 1 


1 EXTRET 1 




JRO 


1 


JR1 1 

1 


1 


STIHEXIT 


1 x# 1 


~~ - ' ■■- 1 

„J 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Heaning 



Storage f o r Timer Interrupt 



EXSAVE 



DS 



16F 



40 


TYPLIST 


DC 


48 


TIMCCW 


DC 


4C 




DC 


50 


TIHCHAR 


DC 


58 


SCAW 


DC 


64 


TIHINIT 


DC 




Storage 


for 


68 


EXSAVE 1 


DS 


A8 


EXTPSW 


DC 


AC 




DC 


BO 


SAVEXT 


DC 


B4 




DC 



Saved external old PSW and/or contents of 

registers 
PLIST to type BLIP character 



CL8»TYPLIN» 

A(TIMCHAR) 

C»B»,X»81»,AE'2(1) 

X»FF»,XL7»00' BLIP character (s) 

XL12»00» Saved CSW/CAW 

A (2000000/13) Value that sets timer equal to 2 seconds 

Storage for External (Other than Timer) In terr upt 
16F Saved registers 

X'80000000» Filled-in PSW 
A(0) 

F*0' Transfer address for external interrupt 

V(DBSDBG) Address in EEBOG for external interrupt 
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EXTSECT 



Hexadecimal Field 
Cisplacement Nane 





Storage for 


Externa 


B8 


EXTRET DS 


D 


CO 


JRO DC 


F»22 


C4 


JR1 DC 


1(0) 


C8 


STIHEXIT DC 


1(0) 


CC 


EXTFLAG DC 


X'OO 



a*i 



REALTIMR EQD X»80» 



Field Description, Contents, Meaning 



Saved external old PSW 

22 doublewords for floating-point registers 

and user save area 
Address of free storage 
Address of STIHER exit routine 
External flag 

Real timer indicator 



CD 



DC 



AL3(0) 



Reserved for IBM use 
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EXTOAEEA 



EXTDAREA: EXTERNAL USER AREA 



EXTDAREA is a 96-byte user area generated by the CHSAVE macro. The pcinter to the user 
area is passed to the user via register 13. The DSAVEPTR field in CMSAVE also points to 
the user area. 



I 



GRS 



40 



FRS 



60 I 
I- 
68 I 



DEXTPSUO 



DSERAREA 



Hexadecimal 


Field 






Displacement 


Name 










DS 


OD 





GRS 


DS 


16F 


HO 


FRS 


DS 


4D 


60 


DEXTPSiO 


DS 


ID 


68 


DSERAREA 


DS 


18F 


BO 


DSEREAND 


DS 


OF 



Field Description, Contents, Heaning 



Registers at time of interrupt 
Floating-point registers at interrupt 
External old PSi at interrupt 
User save area 



Section 2. CHS Eata Areas and Control Blocks 179 



FCBSECT 



FCBSECT: SIMULATED OS CONTROL BLOCKS 



FCBSECT consists of the CHS File Control Block (FCE) (used for file aanagement under 
CMS) , the simulated OS Job File Control Block (JFCB) , Input/Output Block (lOB) , and Data 
Extent Block (DEB) . FCBSECT is invoked via the CMSCE macro. FCBSECT is dynamically 
allocated from CMS free storage each time the FILEDEF command is issued. 



10 



18 



20 



28 



30 



38 



40 



U8 



50 



58 



60 



68 



70 



78 



80 



88 



90 



98 



AO 



A8 



BO 



r ■ - 

1 FCBNEXT 


1 


_ _ _ — _ _ ^ 

FCBPROC 1 


1 FCBDD 1 


1 FCBOP 1 


1 FCBDSNAM | 


1 FCBDSTYP 1 


1 FCBDSMD 1 FCBITEM | 


FCEBDFF 1 


1 FCBBYTE 


1 FCEFORM 1 FCBCODT | 


1 FCBREAD 


1 A*1 1 


A*2 1 FCBXTEHT | 


1 FCBRECL I A*3 


A*4 1 


FCBMEMBR | 


1 FCBMEMBR (cont.) 




FCBOSFST 1 


1 FCBOSDSN 




FCBR13 1 


1 FCBKEYS 




FCBPPS 1 

■ 


1 JFCBMASK 1 

In • 


1 JFCBCRDT 


1 JFCBXPET 


1 A*5 1 A*6 1 


1 A*7 1 A*8 1 JFCBDFL | A*9 | 


A* 10 I//////I A*11 1 


|JFCLIMCT(cont.) 1 JFCDSORG | A*12 | 


A*13 1 JFCBLKSI | 


1 JFCLRECL 1 A* 14 


1 A*15 I///////////////////////////I 

1 


1 DEBTCBAD 


1 


SEBSAV 1 


1 DEBOFLGS 


1 


DEBCPATB 1 


1 lOBNXTAD 


1 


lOBECB 1 


1 DEBDCBAD 

1 " ' - - ■ ■ - ■■' ■ ■■ 1 


1 


lOBECBPT 1 


1 lOBCSW 1 

1 ' 


1 lOBSTART 

L 


1 


- , 

lOBECBPT 1 
- -J 



• Format of Location X*24» for Console Device 



20 



28 I FCBIOOUT (cont.) 



30 I A*16 I A*17 I FCBIOCNT | 
I 1 



FCBIOODT 



FCBIOBDF 
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Eexadecimal 
Displacement 



Field 
Name 



FCBSECT 



Field Description, Contents, Heaning 



FCBINIT DS OX 

Bits defined in FCBINIT 





FCBDOSL 


EQD 


X«20» 




FCBOS 


EQD 


X»10» 




FCBOPCB 


EQD 


X»08» 




FCBPERM 


EQO 


X»04» 




FCBBATCH 


EQU 


X»02' 




FCBCATML 


EQD 


X»01» 





FCBNEXT 


DS 


A 


4 


FCBPROC 


DS 


A 


8 


FCBDD 


DS 


CL8 


10 


FCBOP 


DS 


CL8 


18 


IHAJFCB 


DS 


OD 


18 


JFCBDSNM 


DS 


OX 


18 


FCBTAPID 


DS 


OX 


18 


FCBDSNAM 


DS 


CL8 


20 


FCBDSTYP 


DS 


CL8 



2H 
2C 
30 
31 
32 

28 

28 
2A 
2C 
30 
34 
36 
38 
3C 



3D 
3E 
40 
42 
43 
44 
4C 
50 
54 
58 
5C 
60 
68 
6B 



FCBPRPD EQU FCBDSTYP+4 





ORG 


FCBDSTYP+4 


FCBIOODT 


DS 


CL8 


FCBIOBOF 


DS 


A 


FCBCONCR 


DS 


C 


FCBCONMS 


DS 


X 


FCBIOCNT 


DS 


H 


FCBTBSP 


DS 


OX 


FCBDSMD 


DS 


CL2 


FCBITEH 


DS 


H 


FCBBDFF 


DS 


F 


FCBBYTE 


DS 


F 


FCBFORM 


DS 


CL2 


FCBCODT 


DS 


H 


FCBREAD 


DS 


F 


FCBDEV 


DS 


X 


Bits def; 
FCBCRT 


Lned 
"eqd 


in FCBDEV 
28 


FCBPCH 


EQD 


24 


FCBDSK 


EQD 


20 


FCBTAP 


EQD 


16 


FCBCON 


EQD 


12 


FCBRDR 


EQD 


8 


FCBPTR 


EQD 


4 


FCBDDM 


EQD 





FCBMODE 


DS 


X 


FCBXTENT 


DS 


H 


FCBRECL 


DS 


H 


lOBIOFLG 


DS 


X 


FCBDCBCT 


DS 


X 


FCBMEMBR 


DS 


2F 


FCBOSFST 


DS 


F 


FCBOSDSH 


DS 


F 


FCBR13 


DS 


F 


FCBKEYS 


DS 


A 


FCBPDS 


DS 


A 


JFCBHASK 


DS 


8X 


JFCBCRDT 


DS 


3C 


JFCBXPDT 


DS 


3C 



1*1 



Initialization flag hytes 



Concatenated DOSLIB data set 
FCE for OS formatted disk 
OPEN acquired this CMS block 
Permanent control tlock 
Special batch data set 
Concatenated MACLIB data set 

AL3(next CMSCB) 

A (special processing routine) 

Data definition name 

CMS operation 

Job file control block 

44 bytes, data set name 

Tape identification 

Data set name 

Data set type 

Printer/punch command list 



Special I/O command list 

A (data buffer) 
A*16 Console color code 
A*17 Console miscellaneous information 

Length of data buffer 

T¥o bytes for tape backspace 

count 
Data set mode 

Item identification number 
A (input/output buffer) 
Data count 

File format: fixed/variable records 
Records per CMS physical block 
Number of bytes actually read 



CRT 

Punch 

Disk 

Tape 

Console terminal 

Reader 

Printer 

Dummy device 



A*2 



A*3 
A*4 



Mode: 1, 2, 3, 4, and 5 

Number of items in extent 

DCE LRECL at open time 

I/O flags 

No. of DCEs using this FCB 

OS PLS member name 

Pointer to OS FST 

Pointer to OS dsname block 

Save area vector R13 

A(BES in-storage key table) 

A (PES in-storage directory) 

Various mask bits 

Data set creation date (YDD) 

Data set expiration date (YED) 
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FCBSECT 



Hexadecimal 


Field 






Displacement 


Name 






6E 


JFCBIND1 


DS 


X 


6F 


JFCBIND2 


DS 


X 


70 


JFCBDFNO 


DS 


X 


71 


JFCBFTEK 


DS 


ox 


71 


JFCBFALN 


DS 


X 


72 


JFCBDFL 


DS 


H 


74 


JFCEROPT 


DS 


X 


75 


JFCKEYLE 


DS 


X 


76 




DS 


X 


77 


JFCLIMCT 


DS 


3X 


7A 


FCBDSORG 


DS 


OX 


7A 


JFCDSORG 


DS 


2X 


7C 


FCBRECFM 


DS 


OX 


7C 


JFCRECFM 


DS 


X 


7D 


JFCOPTCD 


DS 


X 


7E 


FCBBLKSZ 


DS 


OH 


7E 


JFCBLKSI 


DS 


H 


80 


FCBLRECL 


DS 


OH 


80 


JFCLRECL 


DS 


H 


82 


FCBIOSi 


DS 


X 




Bits defined 


in FCBIOSW 




FCBCLOSE 


EQO 


X»80» 




FCBCLEA7 


EQD 


X«40» 




FCBPROCC 


EQD 


X«20» 




FCBPROCO 


EQU 


X«10« 




FCBCASE 


EQO 


X«08» 




FCBPVMB 


EQD 


X«04» 




FCBIOHR 


EQD 


X»02» 




FCBIORD 


EQD 


X'OV 


83 


FCBI0SW2 


DS 


IX 




iiis defined 


in FCBI0SH2 



98 
9C 
AO 
AO 
AO 
AU 



FCBMVFIL EQO X»08« 
FCBHMV EQD X»02» 
FCBMVPDS EQD X'OI* 



84 


DEBLNGTH DS 


OX 


84 


DS 


F 


88 


IHADEB DS 


OD 


88 


DEBTCBAD DS 


A 


8C 


SEBSAV DS 


F 


90 


DEBOFLGS DS 


4X 


94 


DEBOPATB DS 


4X 


98 


lOBFLG DS 


OX 




liis defined 


in lOBFLG 



lOBBFLG EQO 

lOBOOT EQO X»40» 

lOBIN EQO X«20» 

lOBOPD EQO X'10» 



lOBNXTAD 


DS 


A 


lOBECB 


DS 


F 


IHAIOB 


DS 


OF 


DEBDEBID 


DS 


OX 


DEBDCBAD 


DS 


A 


lOBECBCC 


DS 


OX 



Field Description, Contents, Meaning 

A*5 Indicator one 
A*6 Indicator two 
A*7 Number of buffers 

Buffering technique 
A*8 Buffer alignment 

Buffer length 
A*9 Error option 
A*10 Key length 

Reserved for IBM use 
A*11 EDAM search limit 

Data set organization 

Data set organization 

Record format 
A*12 Record format 
A*13 Option codes 

Block size 

Block size 

Logical record length 

Logical record length 
A*14 I/O operation indicator 



Switch turned on during CLOSE operation 
DISP=LEA7F during CLOSE operation 
GOTO FCBPROC during CLOSE operation 
GOTO FCBPROC during OPEN operation 
ON=LOWER CASE console I/O 
POT-HOVE-VAR-BLK 
HRITF/POT 
REAE/GET 

A* 15 I/O operation indicators 



Hove file is active 

Move PDS switch for FIND 

Switch for MOVEFILE with PES option 

Length of DEB in doullewords 

Reserved for IBM use 

Data extent block 

A (move-mode user buffer) 

Dynamic save for SEB return address 

(OS input/output simulation) 
Data set status flags 
OPEN/CLOSE option byte 
Start of lOEPREFIX for normal scheduling 



Displacement of lOB flag in ICB 
WRITE, POT in progress 
REAE,GET in progress 
QSAM POTX in progress 

A (next buffer to be used) 

ECE for QSAM normal scheduling 

Input/output block 

DEE identification 

A (data control block) 

ECB completion code 



Bits defined in lOBECBCC 
lOBBECBC EQO 12~ 
lOBBECBP EQD 12 



Displacement of ECB code in ICB 
Displacement of ECB pointer in lOB 
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FCBSECT 



Hexadecimal Field 
Eisplacement Naie 



A4 
A8 



A8 
BO 
B4 

B8 
B8 



lOBECBPT DS 
I0BFLAG3 DS 

lOBBCSS EQD 

lOBCSW DS 
lOB START DS 
lOBDCBPT DS 



lOBEND 
FCBEND 



DS 
DS 



A 
OX 

16 

8X 

A 

A 

OX 
OD 



Field Description, Contents, Heaning 

A (event control block) - see IHADECB DSECT 
I/O error flag 

Displacement of CSU in lOB 

Last CCW stored (that is, residual count) 
X»IE-NEXT BDFFER' ,AL3 (INITIAL BDFFEB) 
A (data control block) 

End of input/output block 

End of FCE, JFCB, DEB, and ICB blocks 



FCBENSIZ EQD (*-FCBSECT) /8 Size of FCB entry in doublewords 
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FCHTAB 



FCHTAB: FETCH TABLE 



FCHTAB contains a fetch/load parameter list that points to a 3M-tyte directory list. The 
fetch table is used when a DOS program issues a LOAE or FETCH request without the LIST= 
parameter.. The IJBFTTAB field in the SYSCOH block in the DOSCON CSECT of NDCCN points to 
the fetch table. 






FCHAPHHM 






1 A*1 1 


FCHALSHH 


1 

1 


8 


DIRNAHE 1 

i 


10 


DIRTTR 






1 A*2 1 DIRTT 


1 DIHLL 


1 


18 


A* 3 i/A*a//l 






DIRPPP 1 


DIREEE 




20 


DIRRR 1 


A* 


5 


1 DIRAAA 


l/A*6//I 




28 


DIRVEE 1 

L 













Hexadecimal Field 
Displacement Name 



Field Description, Contents, Heaning 



8 
10 
13 
14 
16 
18 



19 
1A 
ID 
20 
22 
23 
26 
27 



8-Byte Parameter List Pointing to Cire ctg ry List 
FCHAPHHM DC A (DIRNAHE) " Address of phase name 
FCHOPT DC X»00» A*1 Options 
FCHALSNM DS AL3 Address of listname 



3 4- By te Directory List 



DIRNABE 


DS 


CL8 


DIRTTR 


DS 


XL3 


DIRN 


DS 


XL1 


DIRTT 


DS 


XL2 


DIRLL 


DS 


XL2 


DIRC 


DS 


XL1 


Bits def 


ined 


in DIRC 


SELFREL 


EQD 


X»80» 


RELPHSE 


EQO 


X«40' 


SVAELIG 


EQD 


X»20» 


SVAPHSE 


EQD 


XMO* 


PCLPHSE 


EQO 


X»08' 


PNOTFND 


EQU 


x»ot»» 


DACTIVE 


EQU 


X'02» 


NOTEXT 


EQO 


X'01» 


DIRT 


DS 


XL1 


DIRPPP 


DS 


XL3 


DIREEE 


DS 


XL3 


DIRRR 


DS 


XL2 


DIRR 


DS 


XL1 


DIRAAA 


DS 


XL3 


DIRK 


DS 


XL1 


DIR?EE 


DS 


XL3 



A*2 



A*3 



A*4 

A*5 
A*6 

FCHLENG EQO *-FCHTAB 
FCHLENDH EQO (FCHLENG+7) /8 



Phase name 

Phase TTR 

No. of halfwords in directory 

No. of text blocks in phase 

Length last text block 

Flag byte 



Phase self-relocatable 

Phase to be relocated 

Phase SVA eligible 

Phase in S?A 

Phase in private core image library 

Phase not found 

Phase directory active 

TEXT=NO specified 

Reserved for IBM use 
Phase load point 
Phase entry point 
No. of RLD items in phase 
No. of additional RLD blocks 
Partition start address 
Reserved for IBM use 
Phase entry point in SYA 

Total length in bytes {X'2A') 

Total length in doublewords (X»06') 
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FICL 

IICL: FIRST IH CLASS BLOCK 

FICL is a 2-byte table used in CMS/DOS to address system and progranier logical unit 
blocks. 

Byte of FICL points to the first system class logical unit in the LOB table. This is 
alvays the first entry in the LDB table. The second byte points to the first programmer 
class logical unit in the LOB table partition area. 

The FICLPT field in the BGCOM block points to the FICL block. 



I A*1 I A*2 I 
I J 



Hexadecimal Field 

Displacement Name Field Description, Contents, Heaning 



SYSINDX DC AL1(0) A*1 First BG system LOB index 

1 PROGINDX DC AL1{14) A*2 Programmer LDBs index 
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FRDSECT 



FRDSECT: FREE CHAIH ELEMENT HEADER BLOCKS 



FRDSECT describes the fields used by DMSFRE to reference the four free chain eleient 
header blocks- FRDSECT is invoked by the nacro EMSFRT. The DHSFHT DSECT is pointed to 
by a V-constant in DMSFREE, and also by the ftDMSFRT field in UDCCIl. 



r 

1 




FREELS 






8 1 


r ■ 

1 






10 1 




FREELD 






18 1 


r 
1 






20 1 




FREEHN 






28 1 


r 
1 






30 1 




FHEEHD 






38 1 


1 

1 






40 1 


AFREETAB 


1 


FREEL0W1 




48 1 

L 


ACALL 


1 A*1 


1 A*2 1 


J 



Eexadeciial Field 
DisplaceiBent Naae 



Field pescription. Contents^ Heaning 




10 
20 
30 



The Following Are the Four Free Chain Elem ent Header Blocks 
FREELN DC 3F »0» , ALI (FLUD+FLPA, HOCKEY, NUCCODE, 0) Low storage nucleus 
FREELD DC 3F » 0» , ALI (0,USERKEY,0SERCOEE,0) Low storage user chain 
FREEHN DC 3F » 0', AL1 (FLND*FLHC, HOCKEY, NDCCODE,0) High storage nucleus 
FREEHD DC 3F » 0» , ALI (FLHC, DSERKEY, 0SEHCODE,0) High storage user chain 



The Following Sjabolic Eguates Describe the Foraat of Each of the 

Z5fil Z£®§ Qi^in Element Head er Blocks 

POINTER EQD ~ Pointer to first free element 

NDH EQO 4 Number of elements in chain 

MAX EQU 8 Haximum size of an element 

FLAGS EQD 12 Flag byte 



Bits defined in FLAGS 



FLCLN 


EQD 


X«80« 


FLCLB 


EQO 


X'40» 


FLHC 


EQD 


X'20' 


FLND 


EQD 


XMO« 


FLPA 


EQD 


X«08» 



SKEY 



EQD 



13 



Cleanup flag 
Overlaid chain flag 
High storage flag 
Nucleus flag 
Page available on chain 

Storage key for this chain 



Bits defined in SKEY 
DSERKEY EQD X»EO» 
HOCKEY EQD X»FO« 



Dser storage key 
Nucleus storage key 
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FEDSECT 



Hexadecimal 
Displacement 


Field 
Name 








TCODE 


EQU 


14 




Bits defined 
USERCODE EQU 
NUCCODE EQU 
T8NC0DE EQU 
USARCODE EQU 
SYSCODE EQU 
MAXCODE EQU 


in TCC 
1 
2 
3 
4 
5 
5 




♦UNUSED 
BLOCKLEN 


EQU 
EQU 


15 
16 


40 
44 


AFHEETAB 
FREEL0W1 


DC 
DS 


A(0) 
F 



48 



ACALL 



DS 



A 



Field Description, Contents, Beaning 
FREETAB table code 



User free storage page 

Nucleus free storage page 

Transient area page 

User area page 

System page 

Maximum possible code value 



Symbolic length of block 



Address of IREETAB table 
Original value of FEEELOHE 

(set by IHIT2) 
Address of caller (for errors) 



4C 



Il^as Set b^ Examining SVC 203 Half word Code 
FREEFLG1 DC B11»0« A*1 



4D 



Bits defined 


in FREEFLG1 


FRF1C 


EQU 


X»80» 


FRF IV 


EQU 


X'40' 


FRF IN 


EQU 


X'20' 


FRF IE 


EQU 


X»10» 


FRF1L 


EQU 


X»08' 


FRF1H 


EQU 


X*04* 


FRF1M 


EQU 


X'02» 


FRF IB 


EQU 


X'OV 



Conditional request 
Variable request 
Nucleus request 
FREE (vs FRET) request 
Low storage is OK 
High storage is OK 
Messages wanted on error 
TYPCALL equals BALR in macro 

The Following B^te Holds Flags Internal to the DJSFRE Routine 

FEEEFLG2 DC BL1»0« A*2 



Bits defined in FREEFLG2 

■p-D-pOfT ■pryn vlQAt 

FRF2SVP EQU X«40« 

FRF2N0I EQU X«20» 

FRF2CKE EQU X»10» 

FRF2CKT EQU X»08' 

FRF2CKX EQU X«04« 

Z£^e Chain Element Description 



Cleanup flag 

Variable pages request flag (SCHVPGE) 

Second initialization routine has not yet been 

called by DMSINS 
Do a check each time FREE or FRET is called 
Do a check this time 
Executing CHECK routine now 



POINTER 
SIZE 



EQU 
EQU 



Pointer to next FREE element 
Size of this element in bytes 
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FSCBD 



PSCBD: FILE SYSTEM CONTROL BLOCK 



FSCBD is a PLIST defined for general use by routines that use the CHS file systei, FSCED 
is generated when the user invokes the FSCBD aacro. 



10 



18 



20 



28 



1 FSCBCOHH 




1 


1 FSCBFN 1 


1 FSCBFT 1 


1 FFSCBFM 1 FSCBITNO | 


FSCEBDFF 




1 FSCBSIZE 1 F*1 


1 F*2 1 FSCBNOIT 




1 FSCBNORD 1 







Hexadecimal Field 
Displacement Name 






FSCBCOMM 


DS 


CL8 




8 


FSCBFN 


DS 


CL8 




10 


FSCBFT 


DS 


CL8 




18 


FSCBFM 


DS 


CL2 




U 


FSCBITNO 


DS 


H 




1C 


FSCBBOFF 


DS 


F 




20 


FSCBSIZE 


DS 


F 




24 


FSCBF? 


DS 


CL2 


F*1 


25 


FSCBFLG 


EQD 


FSCBFV*1 


F*2 


26 


FSCBNOIT 


DS 


H 




28 


FSCBNORD 


DS 


A 





Field Description, Contents, Heaning 

File system command (RDBDF, UHBDF, etc.) 

Filename 

Filetype 

Filemode 

Relative record number to be read/written 

Address of read/write buffer or of STJTEFST 

Length of buffer 

RECFH ~ CM» or C^V» 

Flag byte 

Number of records to be read/written 

Number of bytes actually read 
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FSTB 



FSTD: FILE STATUS TABLE ENTRY DSECT 

FSTD descrites the fields in a 40-byte file status table entry as found by STATE, STATEW, 
DHSLFS or DMSLFSB. FSTD is functionally equivalent to the FSTSECT DSECT. 



10 



18 



20 



r- 






FSTFNAHE 


1 


1 FSTFTYPE 1 




FSTDATEW 


1 FSTTIHEW 


1 FSTiRPNT 


FSTRDPHT 1 




FSTFMODE 


1 FSTEECCT 


1 FSTFCLPT 


F*1 1 F*2 1 


L_ 


FSTLRECL 


1 FSTELKCT 


FSTYEARW | 
J 



Hexadecimal Field 
Displacement Name 




8 
10 
12 
14 
16 
18 
1A 
1C 
IE 
IF 



20 
24 
26 



FSTFNAME DS 
FSTFTYPE DS 
FSTDATEW DS 
FSTTIMEW DS 
FSTWRPNT DS 
FSTRDPNT DS 
FSTFMODE DS 
FSTRECCT DS 
FSTFCLPT DS 
FSTRECFM DS 
FSTFLAGS DS 



ID 
ID 
1H 
1H 
1H 
1H 
1H 
1H 
1H 
1C 
IX 



Bits defined in FSTFLAGS 



FSTXWDSK 
FSTRHDSK 
FSTXRDSK 
FSTFILEA 
FSTACTRD 
FSTAC"" nR 
FSTACTPT 
FSTRODSK 



EQU 
EQU 
EQO 
EQO 
EQU 
EQU 
EQU 
EQU 



X'CO* 
X»80« 
X»40' 
X«07» 
X»04» 
X'02' 
X»01» 
X'OO' 



Field Description, Contents, Heaning 

Filename 
Filetype 

Date last written - mmddyy 
Time last written - hhmmss 
Write pointer - item number 
Read pointer - item number 
Filemode - letter and number 
Number of logical records 
First chain link pointer 

F*1 Record format (F or V) 

F*2 EST flag byte 



Extension of read/write disk 

Read/write disk 

Extension of read-only disk 

File is active (one of the following) 

File active for reading 

File active for writino 

File active from a point 

Read-only disk 



Bits redefined for use in RDBUF 



FSTDIA EQU X«40' 

FSTDRA EQU X»01» 

FSTDNI EQU X»00» 

FSTLRECL DS IF 

FSTBLKCT DS 1H 

FSTYEARi DS 1H 



Item available 
Previous record null 
Null record 

Logical record length 
Number of 8C0-byte blocks 
Year last written 



FSTDSIZE EQU (*-FSTD) 



FST size in bytes 
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FSTSECT 



FSTSECT: FILE STATUS TABLE 

FSTSECT defines the file status table (EST) which describes the attributes of a file on a 
CMS virtual disk. FSTSECT is invoked by the macro FSTB. 

The file status tables for all files on the disk are grouped into 800-byte disk records 
referred to as file status table blocks (FSTEs) . Each file status table block can 
accommodate up to 20 file status tables. 



10 



18 



20 



r 








FSTN 






— 1 

1 
1 


1 FSTT 1 
1 I 






FSTD 




1 


FSTiP 


I FSTEP 


1 




FSTM 


1 


FSTIC 


1 


FSTCL 


1 A*1 1 A*2 




1 — 




FSTIL 




1 


FSTIEC 


1 FSTYR 


_i 



Hexadecimal Field 
displacement Name 




8 
10 
14 
16 
18 
1A 
1C 
IE 
IF 



FSTN 


DS 


ID 


FSTT 


DS 


ID 


FSTD 


DS 


IF 


FST«P 


DS 


1H 


FSTRP 


DS 


1H 


FSTM 


DS 


1H 


FSTIC 


DS 


TH 


FSTFCL 


DS 


1H 


FSTFV 


DS 


1C 


FSTFB 


DS 


1C 



A*1 
A*2 



Field Description, Contents, Meaning 

Filename 

Filetype 

Date/time last written 

Write pointer (item number) 

Bead pointer (item number) 

Filemode 

Item count 

First chain link 

Fixed (F) /variable (V) flag 

Flag byte (if used) 



liis defined in FSTFB (Applicab le onlj to STATE FST c opy cf FST-entry 

after successful STATE or STATEW call) 

FSTFRWX ~EQD X»CO«~ Read-only extension of read/write 

disk 
X«80» Read/write disk 

X'40' Bead-only extension of read-only 

disk 
X'07* File is active (one of the fcllcwing) 

X*04* File active for reading 

X'02* File active for writing 

X'01» File active from a designated point 

X«00« Read-only disk 

Siis redefined for use in RDEDF 
FSTITAV EQU X»40» Item available 

FSTRECAV EQD X*01» Previous record null 

FSTNOIT EQD X»00» Null record 



FSTFBH 


EQD 


FSTFROX 


EQD 


FSTFACT 


EQD 


FSTFAR 


EQD 


FSTFAW 


EQO 


FSTFAP 


EQD 


FSTFRO 


EQD 



20 
24 
26 



FSTIL 

FSTDBC 

FSTYR 



DS 
DS 
DS 



IF 

1H 
1H 



Maximum item length 
800-tyte data block count 
Year 



FSTL 



EQD 



♦-FSTSECT 



Size of EST in bytes (X'28«) 



FST Hyperblock Parameters 
FSTFHDP EQD 800 
FSTBKHD EQD 804 



Forward pointer to next hyperblock in storage 
Backward pointer to previous hyperblock in 
storage 
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FVSECT 

II SECT: FIXED VARIABLE STORAGE WORK AREA FOR CHS FILE SYSTEM 

FVSECT is used mainly by file management and I/C routines. F7S contains save areas, work 
areas, and commonly used constants. A typical use of FVS is when a reentrant I/C routine 
requires a work area or save area, since the routine cannot modify itself. FVSECT is 
invoked by the FVS macro. 

I 1 

01 DISK$SEG I 



I , 1 

I I I 

I 1 I 

381 REGSAV3 | 



I 1 

781 RWFSTRG | 



I 1 

CO I ADTFVS I 

I 1 

C8| REGSAVO | 



I , 1 

1001 I ! A*1 I 
I 1 

I i 



1481 F65535 | Ffl4 | 

I 1 

1501 VFREE I F10C | 

i 1 
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FVSECT 



1581 

I 
1601 

I 
1681 

I 
1701 

I 
1781 

I 
1801 

I 
1881 



VFRET 


JSRC 


JSRI 


RiiHID 


F800 




FVSDSKA 


ESKLOC 


RWCNT 


ESKADR 


ADTADD 





FINISLST 



198 




1 FFF 


1A0 


FFE 1 


FFD 1 SIGNAL | A*3 | A*a 


1A8 


//////I A*5 1 A*6 


1 A*7 1 FVSERASO 


1B0 


FVSERAS1 


1 F¥SERAS2 


1B8 


READCNT 


1 /////////////////////////// 


ICO 


FVSFSTN 


1C8 


FVSFSTT 


1D0 




FVSFSTDT 


1 FVSFSTiP 1 FVSFSTRP 


1D8 


FVSFSTB 1 FVSFSTIC | F7SFSTCL | A*8 | A*9 


1E0 


FVSFSTIL 


1 FVFSTDB 1 FVSFSTYR 


1E8 


FVSFSTAD 


1 FVSISTAC 
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FVSECT 



Bexadeciffial 


Field 






Displacement 


Nane 









DISK$SEG 


DS 


15F 


3C 


REGSAV3 


DS 


15F 


78 


RWFSTRG 


DS 


18F 


CO 


&DTFVS 


DC 


2F'0 



Field Description, Contents, Heaning 

For FSTLKP, FSTLKW, ACTLKP, TBKLKP, QQTBK 
For RDEOF, iRBDF, FINIS, STATE, POIKT 
Remaining storage for RDBDF, IJRBDF, FINIS 
ADTLKP 



Save Area for Lowest Level Routines 

ilQL example, READ MFD, RELOFD, DPEISK, TYPSRCH, and ADTLKi) 



C8 
10U 
107 



150 
154 
158 
15C 
160 



ID4 
168 
16C 
170 

174 
174 
178 
17C 
180 
184 
18C 
194 
19C 

19E 
19E 
1A0 
1A2 



REGSAYO 



ERRCODO 



DS 
DC 
DC 



15F 

AL3(00) 

AL1(*-*) 



TRKLSA7E EQU REGSAVO 



Saved R0-R15 

First 3 bytes of return code 
A*1 Error code 

For TRKLKP/X only when called by QQTRK/X 



108 


REGSAV1 


DS 


15F 


144 




DC 


AL3(00) 


147 


ERRC0D1 


DC 


AL1(*-*) 


148 


F65535 


DC 


F«65535' 


14C 


FW4 


DC 


F'4» 



HW4 



EQD 



FH4+2 



Save Area for Next- to-Lowest Level Routines 

(151 example, rIaDFST, ERASE, ALTER, and INTSVC-LOADMOD) 



Register save area 
First 3 bytes of return code 
A*2 Error code 

= X'COOOFFFI' 
Constant value 

Constant value 

Constant value 

Constant value 

Address of FRET (into R15) 

RO saved here for FRET calls 

R1 saved here for FRET calls 



Address of uFD 
800 bytes 

Address of the active disk table 

All-purpose RDTK/WRTK PLIST 

Address of item to be read cr written 

Byte count (usually 800) 

Disk address of item to be read or written 

Address of active disk table now in use 

PLIST to close all files 



VFREE 


DC 


Y(FREE) 


F100 


DC 


F»100« 


VFRET 


DC 


V(FRET) 


JSRO 


DC 


F»0» 


JSR1 


DC 


F'O' 


PLIST to 


B§ad/Write HFD 


RHMFD 


DC 


A(*-*) 


F800 


DC 


F'800» 




DC 


A(HW4) 


FVSDSKA 


DC 


A(*-*) 


DSKLST 


DS 


OF 


DSKLOC 


DS 


A(*-*) 


RWCNT 


DC 


A(*-*) 


DSKADR 


DC 


A(*-*) 


ADTADD 


DC 


A(*-*) 


FINISLST 


DC 


CL8«FINIS» 




DC 


CL8«*» 




DC 


CL8»*» 




DC 


CL2'*» 




DS 


OH 


FFF 


DC 


X»FFFF« 


FFE 


DC 


X»FFFE' 


FFD 


DC 


X»FFFD' 



Halfword constants 

Means no significant data past 215th byte 
1968-era MFE still supported on input only 
Newest signal for 2314 handling 



Section 2. CMS Data Areas and Control Blocks 193 



FVSECT 



Hexadeciaial Field 
Displacement Naae 



1A4 



ia6 



1A7 



1A8 
1A9 
1AA 



1AB 
1AC 
1B0 
1B4 
1B8 
1BC 



ICO 
ICO 
1C8 

1D0 
1D4 
1D6 
1D8 
IDA 
1DC 
IDE 
IDF 
lEO 
^^EH 
1E6 

1E8 



1EC 



SIGNAL 



DC 



H'O 



lils defined in SIGNAL 
SWTCH EQD SIGNAL* 1 



UFDBUSY DC 



X»00» 



Bits defined in OFDBDSY 
WRBIT EQU X»80' 
DPBIT EQD X»40« 
FNBIT EQD X»20» 
EEBIT EQD X»10» 
DIOBIT EQD X«08» 



Field Description, Contents, Heaning 

SIGNBL = Scratch halfword used by READHFD 
or ERASE 
= COCO, X'FFFF', X»FFFE», or X'FFFD' 



00, FF, FE, or FD 
A*3 Nonzero means OFD is being updated 



WREDF 

DPDISK - READMFD 

FINIS 

ERASE - ALTER - READFST 

RDTK/iRTK 



Bits for Routines That Do Not D^date the r isk , but Tha t Cannot Be 
Ji]P.tg£?SEted bj[ a HX C o mmand 

ABNBIT EQD X»02* DHSAEN (abend recovery routine) 

ITSBIT EQO X«01' DHSIIS (SVC handling routine) 



KXFLAG 



DC 



X»00» 



A*4 HX flags 



Bits defined in KXFLAG 
KXHANT EQD X«80«~ 
KXWSVC EQD X«01» 



DC 
FLGSAVE DC 
FVSFLAG DC 



X'OO' 
X'OO' 
X»00' 



A*5 
A*6 



HX wanted as soon as possible 
Hold EX until any SVC activity 

Reserved for IBH use 

For scratch use (for example, by RELDFD) 

For general use (as needed) 



Miscellaneous Storage Used b^ ERASE (or RENAME) 



ERSFLAG DC 
FVSERASO DC 
FVSERASI DC 
FVSERAS2 DC 
READCNT DC 
DC 



X»00» 

F'O' 

F'O' 

F»0» 

F'0» 

F»0' 



lilG Status Table (FST) 



STATEFST DS 
FVSFSTN DC 
FVSFSTT DC 
FVSFSTDT DC 
FVSFSTiP DC 
FVSFSTRP DC 
FVSFSTM DC 
FVSFSTIC DC 
FVSFSTCL DC 
FVSFSTFV DC 
FVSFSTFB DC 
FVSFSTIL DC 
FVSFSTDB DC 
FVSFSTYR DC 



OD 

D«0» 

D»0' 

2H'0' 

H'0« 

H»0» 

H«0» 

H«0» 

H»0» 

C» • 

X'OO' 

F'O' 

H'O* 

2C' ' 



FVSFSTAD DC A(0) 

STATERO EQD FVSFSTAD 

FVSFSTAC DC A(0) 

STATER 1 EQD FVSFSTAC 



A*7 Flag for use by ERASE or RENAME 
RO to/from FSTLKW (for ERASE) 
R1 to ACTLKF or FSTLKW (for ERASE) 
Address of free storage used by ERASE 
Current read count (DMSBED) 
Reserved for IBM use 

Copi from STATE 

"Full FST of file (STATE) 
Filename 
Filetype 

Date/time last written 
Write pointer (item ID) 
Head pointer (item ID) 
Filemode 

Number of items in file 
Disk address (first chain link) 
A*8 Fixed (F) /variable (V) indicator 
A*9 Flag byte 

Length of largest item in file 
Number of data blocks 
Year last written 

A (active disk table for this file) 



A (real FST entry for this file) 
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IHADECE 

ISADECB; DATA EVENT COHTROL BLOCK 

IBADECB, which is invoked via the CMSCB macro, is the simulated data event control block 
used for CMS processing of OS macros and OS access methods. The ICEECBPT field in 
FCBSECT points to IHADECB- 








DECSDECB 


1 DECIYPE 1 DECLNGTH 


T 


8 




DECDCBAD 


1 EECAEEA 




10 




DECIOBPT 


1 DECKYADE 




18 




DECRECPT 







Hexadecimal Field 
Displacement Name 



DECSDECB DS 
DECTYPE DS 



Field Description, Contents, Meaning 

Event control block 
Type of I/O request 



liis defined in DECTYPE 
DECBRD EQD X«80« 
DECBWR EQU X«20» 



Read SF 
Write SF 



6 


DECLNGTH 


DS 


H 


8 


DECDCBAD 


DS 


A 


C 


DECAREA 


DS 


A 


10 


DECIOBPT 


DS 


A 




BDAM Extension 




1U 


DECKYADR 


DS 


A 


18 


DECRECPT 


DS 


A 




Frequently Used Equates 




DDNAH 


EQD 


FCBDSTYP 




BLK 


EQD 


X'10« 




BS 


EQD 


X»20» 




DA 


EQD 


X'20« 




FXD 


EQD 


X«80' 




IS 


EQD 


X«80« 




LOC 


EQD 


X»08» 




MOV 


EQD 


X'10» 




PS 


EQD 


X»40» 




PO 


EQD 


X«02« 




PREVIOUS 


EQD 


X'80» 




QS 


EQD 


X«40» 




OND 


EQD 


X'CO' 




VAR 


EQD 


X'40' 



Length of key and data 
V(data control block) 
V(key and data, buffer) 
V(IOE) 



V(key) 

V (block reference field) 



Filetype = data set name 
RECFM=blocked records 
MACRF=BSAM 
DS0R6=direct access 
RECFM=fixed-length records 
DSORG=indexed sequential 
MACRF=locate mode 
MACRF=move mode 
DSORG=physical sequential 
DSORG=partition€d organization 
OFLG£=previous I/O operation 
MACRF=QSAB 

RECFM=undef ined format records 
RECFM=variable-length records 
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lOSBCT 



10 SECT: I/O INTERRUPT SAVE AREA 



lOSECT describes the fields used by DMSITI for save registers, I/C eld PSW, and other 
data when handling I/O interrupts. lOSECT is pointed to by the AICSECT field in NDCOB. 



I 



lOSAVE 



40 I 
I 

48 I 
I- 

50 I 



lONTABL 



AOSRITBL 



JOSRILST 



OLDEST 



60 I 



NEXTO 



70 I 
I 

78 I 
I 

80 I 



lOPSW 



lOCSW 



HOLD 



I VSTRiNGE I////////////// 



88 I /////////////////////////////////////////////////////// 

I 1 



Hezadeciial Field 
Displaceient Naie 






lOSAVE 


DS 


16F 


no 


lONTABL 


DC 


F»0« 


nn 


AOSRITBL 


DC 


A(0) 


48 




DC 


F»28« 


ac 


AOSRILST 


DC 


A(0) 


50 


OLDEST 


DS 


4F 


60 


NEXTO 


DS 


4F 


70 


lOPSB 


DS 


2F 


78 


lOCSW 


DS 


2F 


80 


HOLD 


DC 


F'O* 


84 


VSTRANGE 


DC 


H»0« 


86 




DC 


IH'O' 


88 




DC 


2F»0» 



Field Description, Contents, Meaning 

Register save area 

Size of user interrupt table in doublewords 

Address of user interrupt table 

Length of each entry 

Address of last entry in table 

Oldest I/O old PSW and CSW 

Next oldest I/O old PSW and CSW 

Newest I/O old PSW 

Newest CSW 

Holds entry pointer for device 

Unknown device address saved here 

Reserved for IBB use 

Reserved for IBB use 
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KEYSECT 



KEYSECT: DISK KEY TABLE DSECT FOB BDAM SIMDLATIOS 



KEYSECT defines the key table used in OS simulation 
KEYSECT is tuilt dynaaically from CHS free storage. 



of BDAH files for I/O by key. 



1— 


KEYLNGTH 


1 


EATAEHE 


1 KEYOP 


1 KEYNAHE 


1 KEYTYPE 




KEYMODE 1 


KEYTBLHO | 


KEYTBLAD 




TBILNGTH 


1 A*1 


1 A*2 I KEYCCDT 


1 1 

1 1 



10 



18 



20 



28 



30 



KEYTAELE 



Hexadecimal Field 
Displacement Name 






KEYLNGTH 


DS 


IF 




4 


DATAEND 


DS 


IF 




8 


KEYOP 


DS 


2F 




10 


KEYNAME 


DS 


2F 




18 


KEYTYPE 


DS 


2F 




20 


KEYMODE 


DS 


IE 




22 


KEYTBLNO 


DS 


1H 




24 


KEYTBLAD 


DS 


IF 




28 


TBLLNGTH 


DS 


IF 




2C 


KEYFORB 


DS 


IX 


A*1 


2D 


KEYCHNG 


DS 


1X 


A*2 


2E 


KEYCOUT 


DS 


1H 




30 




DS 


IF 




34 


KEYTABLE 


DS 


OF 





Field Description, Contents, Meaning 

Key length 

Pointer to last data item in file 

Start of PLIST for keys file 

Filename of keys file 

Filetype of keys file 

Filemode of keys file 

Item number of key table 

Address of key table 

Byte size of key table 

Format of keys file 

Indicates change in key table 

PTor-V-iTirr -far+OT* <tP Ve"^ "'•ab'''* 

Number of bytes read 

Start of keys table (item number) 
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LDRST 



LjQIST: loader storage area 



LDRST describes the fields of the work area used by the loader. The work area is 
obtained and built by DMSLDR. LDRST is built dynaaically by DBSLDH froi CHS free 
storage. 



f ... _ 


GPRSAV 






1 


LOCSAV 


1 RETT 


1 


LCCCT 


1 BRAD 


1 


TELREF 


1 A*1 1 A*2 1 TBLCT 


1 A*3 


1 ////// 1 ///////////// 


1 ///////////// 1 ////////////// 1 ///////////// 1 ///////////// 


1 RLDCONST 


1 


PARMLIST 


1 RETREG 


1 
f 






SPEC 






8 
10 
18 
20 
28 
30 
38 



3581 

I 

360 1 



ESIDTB 



5581 



560 



APSV 



5981 
I 

5A0I 
I 

5A8I 
I 

5B0I 

I- 
5B8I 

I- 
5C0I 

I- 
5C8I 

I- 
5D0I 



TEMPST 



TMPLOC 



CRDPTR 



FILE 



REAEBDF 



FNAHE 



FTYPE 



FMODE 



RITEM 



RADD 



RLENG 



RFIX 



RHOH 
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LDRST 



5D81 

I 

5E0I 



HOMBYTE 



FINIS 



I 

5F8I A*4 
I 

5FCI 



I //////////////////// I 

1 



SYSDT1 («»« bytes) 



6281 



TYPLIN 



630 



TYPREAD 



6381 



DSKLIS 



6501 

I 

6581 



6601 



I- 



HEXCON 



DSKAD 



I 1 

I OUTPUT I 
1 



6701 



ODTBDF 



I 

6D0I 

I 

6D8I 

6E0 i 
I 

6E8I 
I 

6F0I 



PBVCNT 



SAV67 



Vt^rp^IlM^ 



ENTADR 



MEMBOUND 



PLISTSAV 



8P0| 



REG13SAV 



I A*5 I 
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LDRST 



Bexadeciial 


Field 






Displacenent 


Naie 









GPRSA? 


DS 


3F 


C 


LOCSAV 


DS 


F 


10 


RETT 


DS 


F 


14 


LOCCT 


DS 


F 


18 


BRAD 


DS 


F 


1C 


TBLREF 


DS 


F 


20 


FLAG1 


DS 


X 




Bits def; 


Lned 


in FLAG1 




absolute' 


'eqo 


X'80» 




FSTXTADR 


EQU 


X»40» 




COMHOUEX 


EQO 


X'20» 




PREXIST 


EQO 


X'10» 




ENDCDADR 


EQU 


X«08» 




NOERASE 


EQU 


X'04» 




SORKFILE 


EQU 


X»02» 




NODDP 


EQU 


X«01« 



21 



FLAG2 



DS 



Field Description, Contents, Heaning 

R9 through R12 

Base register contains A(DBSLDRA) 
Return register for DHSLSB 
(LOCCHT) next load location 
(STRTAEDR) start execution address 
(ALERTBL) top of loader table 
A*1 Loader switches (permanent) 



Absolute loading 

First text address saved 

Common entries exist in loader table 

PR entries exist in loader table 

Allov end card address 

Do not erase the load map 

Work file (SYSUT1) exists 

Do not type message DHSLI0202W 

A*2 Loader switches (permanent) 





Bits def 


ined 


in FLAG2 




STRINITC 


"equ 


X«80» 




NOHAP 


EQU 


X»40» 




APRILB 


EQU 


X«20« 




NOAUTO 


EQU 


XMO* 




TYPE 


EQU 


X»08» 




NOREP 


EQU 


X«04' 




NOIH? 


EQU 


X'02« 




HOLIBE 


EQU 


X«01» 


22 


TBLCT 


DS 


H 


24 


FLAG3 


DS 


X 




Bits defined 


in FLAG3 




CMD 


EQU 


X«80"» 


25 




DS 


X 


26 




DS 


SH 


30 


RLDCONST 


DS 


F 


34 


PARHLIST 


DS 


F 


38 


RETREG 


DS 


F 


3C 


SPEC 


DS 


200F 


35C 


ESIDTB 


DS 


2S6H 


55C 


APSV 


DS 


16F 


59C 


TEHPST 


DS 


F 


SAO 


THPLOC 


DS 


F 


5A4 


CRDPTR 


DS 


F 


5A8 


FILE 


DS 


D 


5B0 


READBUF 


DS 


2F 


5B8 


FHAHE 


DS 


2F 


SCO 


FTYPE 


DS 


2F 


SC8 


FMODE 


DS 


H 


SCA 


RITEM 


DS 


H 


sec 


RADD 


DS 


F 


SDO 


RLENG 


DS 


F 


5D4 


RFIX 


DS 


H 


5D6 


RNUH 


DS 


H 



Call STRIBIT in LOADHOD 

Do not create a load map 

REP card processing control 

No automatic text deck checking 

Type load map at terminal 

Ho REP card printing 

No invalid card typeout 

Ho automatic TXT library searching 

number of entries in loader table 
A*3 More flags 



Processing names from command list 

Reserved for IBH use 

Reserved for IBH use 

Relocation constant 

Updated parameter list pointer 

Return register 

10-card input buffer 

2S6 ESD entries; object deck 

Register save area for subroutine calls 

Temporary RLD routine storage 

Temporary storage 

Input card pointer 

Save location for DHSLIB 

Input read parameter list 

Filename 

Filetype 

Filemode 

number of items 

Buffer address 

Buffer length 

Fixed/variable flag byte 

Number of items 
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LDEST 



Bexadeciial 


Field 






Displacement 


Name 






5D8 


HOMBYTE 


DS 


F 


5DC 


FINIS 


DS 


7F 


5F8 


FLAGS 


DS 


X 




START 


EQD 


X«80« 




ONEDYNA 


EQD 


X»40' 




ESDIST 


EQD 


X»20» 




NOSLCADR 


EQU 


X»10« 




SETLIB 


EQU 


X»08» 




CLOSELIB 


EQD 


X'04» 




LDNDEF 


EQD 


X'02' 




RESET 


EQD 


X"01" 


5F9 




DS 


3X 


5FC 


SYSUT1 


DS 


HF 


628 


TYPLIN 


DS 


2F 


630 


TYPEAD 


DS 


2F 


638 


DSKLIN 


DS 


7F 


654 


DSKAD 


DS 


13X 


661 


HEXCON 


DS 


14X 




PACK 


EQD 


HEXCON 




UNPACK 


EQD 


HEXC0ll*5 


66F 


ODTPOT 


DS 


X 


670 


ODTBDF 


DS 


100X 


6D4 


PRVCNT 


DS 


H 


6D8 


SAV67 


DS 


2F 


6E0 


ENTNAME 


DS 


CL8 


6E8 


ENTADR 


DS 


F 


6EC 


MEMBODND 


DS 


F 


6F0 


PLISTSAV 


DS 


64D 


8F0 


REG13SAV 


DS 


F 


8Ftt 


FRSTSDID 


DS 


X 


8F8 


ENDFREE 


DS 


OD 



Field Description, Contents, Meaning 

Number of bytes actually read 
FINIS parameter list 
A*4 Loader switches (nonpermanent) 

Start execution requested 

One call to dynamic loading per text file 

First ESE data item this card 

No address field in SLC card 

Set up for library searching 

Clear TXTLIE searching 

Dndefined entries exist in leader table 

Reset "entry" specified 

Library search work area pointer 

RLD work file PLISTs 

TYPLIN parameter list 

TYPLIN buffer address 

Disk parameter list for load map 

Hexadecimal constant 

Hexadecimal constant 
Hexadecimal constant 



Output buffer for load map and terminal 

printing 
Address of next PR load address 
Temporary save area of R6 and R7 
Entry name (reset ENTRY or entry control 

card) 
Entry name's loader table location 
Low extend of free storage (FEEELOHE) 
LOAD (IHCLDEE) PLIST saved 
Address of LDRST 
A*5 First section definition identification 



NEED 



EQD (ENDFREE-LDRST)/8 



Note; The following equates refer to displacements and flags in the 
REFTABLE entry usually pointed to by register 12 

Displacement of 8-byte name field 

Displacement of flag byte 1 

PR - byte alignment 

PR - halfword alignment 

PR - fullword alignment 

PR - doubleword alignment 

Dndefined symbol 

Resolve CXD 

Define common area 

Ueak external reference 

LIEF card - nonobligatory 

Single bit for nonobligatory LIBE card 

Displacement of relocation factor or maximum 

address 
Displacement of absolute or assigned value 
Displacement of flag byte 2 
Command line name - must resolve 



REFNAME 


EQD 





REFLG1 


EQD 


8 


REFPRB 


EQD 


X«7C* 


REFPRH 


EQD 


X»7D« 


REFPRF 


EQD 


X«7E« 


REFPRD 


EQD 


X«7F» 


REFDND 


EQD 


X»80« 


REFCXD 


EQD 


X«81« 


REFCOM 


EQD 


X»82» 


REFHEX 


EQD 


X«83' 


REFNOB 


EQD 


X«90» 


REFLIB 


EQD 


XMO' 


REFINFO 


EQD 


9 


REFVAL 


EQD 


13 


REFLG2 


EQD 


16 


REFCMD 


EQD 


X«80» 
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LDBTAB, LDBPR 

LOBTAB AHD LUBPR: LOGICAL UNIT BLOCK TABLE 

LDBTAB is a device table that has a 2-byte entry for each symtolic name used by CHS/DOS. 
The simulated LOB has 255 entries: 14 entries for the system logical units and 241 
entries for prografflBer logical units. System devices (SYSRDR, SYSIPT, SYSPCH, SYSLST, 
and SYSLOG) can be assigned to alternate devices. The systei and programmer tables are 
defined with separate DSECTs: LOBTAB and LDBPR. LDBTAB is pointed to by the LDEPT field 
in BGCOM- The address of the first LDB entry is in the first byte of the FICL control 
block. 



Systei (LDBTAB) 



LDBRDR 



I LDBIPT 



I LDEPCH 



I LDBLST 



LDBLOG 



I//LDBLHK/////I LDERIS 



I LDBSLB 



10 



LDBRLB 



I//LDBDSE/////I//LDEREC//////I LDBCLB 



18 I //LDB VIS//// I LDBCAT 
I 



Prograimer (LDBPR) 



I LDBOGO 
I 

8 I 



I LDB001 



I LDEC02 



I LDB003 



LDB004 through LDE239 



1E0 



LDB240 



I LDB241 



Hexadecimal Field 
Displacement Name 






System 
LDBRDR 


LDBs 
DS 


XL2 


2 


LDBIPT 


DS 


XL2 


4 


LDBPCH 


DS 


XL2 


6 


LDBLST 


DS 


XL2 


8 


LDBLOG 


DS 


XL2 


A 


LDBLNK 


DS 


XL2 


C 


LDBRES 


DS 


XL2 


E 


LDBSLB 


DS 


XL2 


10 


LDBRLB 


DS 


XL2 


12 


LDBDSE 


DS 


XL2 


14 


LDBREC 


DS 


XL2 


16 


LDBCLB 


DS 


XL2 


18 


LOBYIS 


DS 


XL2 


1A 


LDBCAT 


DS 


XL2 




Programmer L 
LDBOOO DS 


DBS 





XL2 


2 


LDB001 


DS 


XL2 


4 


LDB002 


DS 


XL2 


6 
8 


LDB003 

• 


DS 


XL2 



1E0 



LDB240 



DS 



XL2 



Field Description, Contents, Heaning 



System virtual reader 

System virtual input device 

System virtual punch 

System virtual printer 

Terminal 

Reserved for IBM use 

System residence volume 

Private source statement library 

Private relocatable library 

Reserved for IBH use 

Reserved for IBH use 

Private core image library 

Reserved for IBH use 

VSAH catalog 



Programmer logical unit blcck 
Programmer logical unit blcck 
Programmer logical unit blcck 
Programmer logical unit block 
LDECC4 through LDB239 are defined with DS 

and XL2. Each is a programmer logical 

unit block. 
Programmer logical unit blcck 
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LUBTAE, LUEPB 



Hexadecimal Field 

Displacement Name Field Description, Contents, Meaning 



1E2 LDB2iH DS XL2 Programmer logical unit block 

LDBP EQU Displacement to PDB pointer 

LDBJ EQD 1 Displacement to JIB pointer 

LDBL EQD *-LDB241 LDE length 
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NICL 



NICL: NUMBER IN CLASS 



Byte of the Number In Class block (NICL) contains the number of system class logical 
units- The second byte contains the number of programmer class logical units for the 
partition. 

The NICLPT field in the BGCOM block points to the NICL block. 



I A*1 I A*2 I 
t 1 1 



Hexadecimal Field 

Displacement Name Field Description, Contents, Meaning 



NOSYS DC AL1(1t») A*1 Total number of system LDBs 

1 NOPROG DC AL1(242) A*2 Total number of programmer LDEs 
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NDCCN 



NDCON: NUCLEUS CONSTANT AREA 



NUCON is the nucleus constant area of CMS. 




8 
10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 
90 
98 
AO 

CO 



IPLPSW 



IPLCCWI 



IPLCCi2 



EXTOPSW 



SVCOPSW 



MCKOPSW 



lOOPSH 



CSH 



CAH 



I //////////N UCR S V 1 ////////// 



TIBER 



I //////////N OCR SV2////////// 



EXTNPSW 



SVCNPSfl 



PGMNPSW 



HCKNPSU 



lONPSW 



CPULOG 



//////////NUCRSV4///////////I MOHCLASS | PERCCDE 



PERADDR 



MCNCODE 



/////////////////////////NtJC R S V 5//////////////////////// 
//////////////////////////////////////////////////////// 
//////////////////////////////////////////////////////// 



L0WSA7E 



1601 



FPRLOG 



1801 



GPRLOG 
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NDCON 



1C0| 



ECBLOG 



2001 



SYSTEHID 



220 1 



INSTALIE 



260 
268 
270 
278 
280 
288 
290 
298 
2A0 
2A8 
2B0 
2B8 
2C0 
2C8 
2D0 
2D8 
2E0 



SYSNAHE 


IPLADDR 1 SYSADDR 


1 


EEVICE 




//////////NDCRSV6/////////// 1 

I 








FEIBM 




CDBBDATE 


CDBRTIME 


CURRVIRT 


1 


CDRRCPDT 




LASTVIHT 


1 


LASTCPOT 




LASTCMND 


PREVCHND 


LASTEXEC 




PREVEXEC 






LASTLMOD 


LASTTMOD 


DATIPCMS 


CLKVALME 



MACDIRC 



3001 



HACLIBL 



3481 
I- 
3501 



TXLIBSV 



HACLBSV 



TOTLIBS 



TXTDIRC 
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NDCCB 



358 



TXTLIES 



3A0I 



3A8 



GRS015 



FIRSTDMP 



LCC0176 



LflSTDHP 



3B0I 
I 



FES06 



DHPTIT 



3B8 I //////////////////////////// I 

I 1 

I DMPTITLE 



'♦^O I //////////GLBLTABL////////// 1 

I 

448 1 ERR$202 1 
I 



SVC$202 



I///////////// 



4501 A*1 I A*2 I //////////// I 
I 

458 1 ABATABND | 

I 

460 1 ADSERST 



AEAIPROC 



AEATLIHT 



I /////////////////////////// 



I 

I 

4701 DOSDIRC 



rOSLBSV 



I 
4901 



DG3L1EL 



4D8 


A*3 1 A* 4 1 //////////// 


ALTASA7E | 

1 


4E0 


ABGCOM 


ASISCOB 1 


4E8 


ADOSDCSS 


SVC12SAV 1 


4F0 


DOSFIRST 


rOSNOB I////////////I 


4F8 


APPSAVE 


EOSTRAHS 1 


500 


MAINLIST 


MAINSTRT 1 


508 


FREELIST 


FRFENDH | 


510 


MAINHIGH 


FREELOWE 1 


518 


FREELOWR 


FREEDPPR 1 


520 


ANOCEND 


ADSRAREA | 
. .. , 1 
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HDCON 



528 


r ■ — 


CDRRSAVE 




1 COEE203 1 PCTCHSFS | 


530 


ADMSFST 


1 VCADTLKP 1 


538 


VCADTNXT 


1 VCADTLKW 1 


540 


CORRIOOP 


1 PENDREAD | 


548 


PENDWRIT 


1 FSTFIHRD 1 


550 


LSTFINRD 


AINTRTBL | 


558 


AOOTRTBL 


1 NDHFINRD i NOHPNDHR | 


560 


VMSIZE 


ALERTBLS | 


568 


STRTADDH 


FRSTLOC I 


570 


LASTLOC 


LOCCHT 1 


578 


LDRADDR 


LDRRTCD 1 


580 


PSl 




588 


LDRFLAGS 


PRHOLD 1 


590 


TBEHT 1 A*5 


1 A*6 


GET1 1 


598 


DSYI 




5A0 


JSYM 


A*7 1 1 


5A8 




ALIASEHT 1 


5B0 


DYHAEHD 


/////////////////////////// 1 


5B8 


//////////////////////////// 


/////////////////////////// 1 


5C0 


FCBFIRST 


FCENOH I//////I 


A*8 1 
1 


5C8 


//////////////////////////// 


LIHKLAST 1 


5D0 


LINKSTRT 


TAXEADDR | 


5D8 


ATSOCPPL 


ECBSAV 1 


5E0 


A*9 1 


A*10 1 A*11 


1 A*12 


////////////I A*13 1 


A*14 1 
1 


5E8 


A* 15 1 


A*16 1 A*17 


1 /////// 


■" '■■■■ "■ — ~" '- ■"'- 1 

ASISNAHS 1 


5F0 


ACMSSEG 


ADHSLIO 1 


5F8 


VCFSTLKP 


VCFSTLKW 1 


600 


AFVS 


AOPSECT 1 


608 


ADEVTAB 1 


AFSTLKP 1 


610 
1 


L _ _ 


AGETCLK 


1 


AFSTLKW 


1 
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NDCCN 



618 
620 
628 
630 
638 
640 
648 
650 
658 
660 
668 
670 
678 
680 
688 
690 
698 
6A0 
6A8 
6B0 
6B8 
6C0 
6C8 
6D0 
6D8 
6E0 
6E8 
6F0 
6F8 



1 APIE 1 aiADT 1 


i AUSER 1 ABTTK | 


1 ASCANS 1 ASSTAT | 


1 ATABESD 1 ASDBSECT | 


1 AOSflODL 1 ABETK | 


1 ASTRINIT 1 lAIT | 


1 AFREE 1 AFHET | 


1 ADHSPIOC 1 APGMSECT | 


i AI03ECT i AESPEXEC | 


1 ADIOSECT 1 AAENSVC | 


1 ADMSERL 1 ADHSCRD | 


I ADMSFREB | AS7CSECT j 


1 AADTLKP 1 ADPOFD | 


1 ASTATEXT | AOSRET | 


1 ACMSRET 1 ASCANO | 


1 AEXEC 1 ASTART | 


I AADTLKH | ADSABBV | 


1 AEXTSECT 1 ASCBPTR | 


i ADMSROS I LEHSROS | CDHSEOS | 


1 AACTLKP 1 AACTNXT | 


1 AACTFREE | AACTFRET | 


i AADTNXT 1 ATRKLKP j 


1 ATRKLKPX 1 AQQTRK | 


1 AQQTRKX 1 AEHASE | 


1 ATYPSRCH 1 ADPDISK | 


1 AKILLEX 1 ATFINIS | 


1 ARDBUF 1 AWEBDF | 


1 AFINIS 1 ASIATE | 


1 ASTATEH 1 APCINT | 
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NDCON 



r I 

7001 CONCCHS I 

t I 

7081 I 

I 1 

7101 COWINELK | | 

I 1 I 

718 1 CONINEOF I 



I 1 

7A0| CMNDLINE I 



I 1 

8481 CMNDLIST I 



I 1 

A60| CONSTiCK I 



I 1 

BAOI FBEESAVE | 



I 1 

BEOI BALBSAVE I 



I 1 

C20| WAITSAVE | 



I 1 

C60 I PCTfSAM I//////////////I///////////////////////////I 

I ^ 1 

C68| ADIKQLAB | NCIKQLAB | 

I 1 

C70| ARORTBL | ADBSVIB | 

I 1 

C78I A7IPW0BK I A* 18 I //////////////////// I 

I 1 

C80| AVSAMSYS | AAHSSYS | 

I 1 

C88I AVSBEOJ | AVS6R0BK | 

I 1 

C90I ACBLIST I /////////////////////////// I 

I 1 

C98I////////////////////////////I///////////////////////////I 

I 1 
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NUCCH 



Eexadecinal 


Field 






Displacement 


Nane 









Machine i 
IPLPSW 


Usage 

"ds 


ID 


8 


IPLCCW1 


DS 


ID 


10 


IPLCCW2 


DS 


1D 






ORG 


IPLPSW 





RSTNPSW 


DS 


ID 


8 


R STOPS H 


DS 


ID 


10 


ACMSCVT 


DS 


IF 


14 


ASYSREF 


DS 


IF 


18 


EXTOPSW 


DS 


ID 


20 


S¥COPSi 


DS 


1D 


28 


PGMOPSW 


DS 


ID 


30 


HCKOPSW 


DS 


ID 


38 


lOOPSW 


DS 


ID 


40 


CSi 


DS 


ID 


48 


CAW 


DS 


IF 


4C 


N0CRSV1 


DS 


IF 


50 


TIMER 


DS 


IF 


54 


N0CRSV2 


DS 


IF 


58 


EXTNPSW 


DS 


ID 


60 


SVCNPSW 


DS 


ID 


68 


PGMNPSW 


DS 


1D 


70 


MCKNPSW 


DS 


ID 


78 


lONPSH 


DS 


ID 


80 


CPDLOG 


DS 


48D 






ORG 


CPOLOG 


80 


NUCRSV3 


DS 


2D 


90 


NDCRSV4 


DS 


IF 


94 


MONCLASS 


DS 


1H 


96 


PESCODE 


DS 


1H 


98 


PERADDR 


DS 


IF 


9C 


MONCODE 


DS 


IF 


AO 


NDCRS75 


DS 


4D 


CO 


LOWSA?E 


DS 


XL160 


160 


FPRLOG 


DS 


4D 


■ion 

1 o u 


GPRLOG 


DS 


16F 


ICO 


ECRLOG 


DS 


16F 


200 


System 0: 

systemid" 


sage 

'5s 


CL32 


220 


INSTALID 


DS 


CL64 


260 


SYSNAME 


DS 


CI8 


268 


IPLADDR 


DS 


1H 


26A 


SYSADDR 


DS 


1H 


26C 


DEVICE 


DS 


IF 


270 


NDCRSV6 


DS 


IF 


274 


FEIBM 


DC 


CL12»FEI 


280 


DIAGTIME 


DS 


CL24 






ORG 


DIAGTIME 


280 


CDRRDATE 


DS 


CL8 


288 


CDRRTIME 


DS 


CL8 


290 


CDRRVIRT 


DS 


IF 


294 


CORRCPDT 


DS 


IF 


298 


LAST7IRT 


DS 


IF 


2 9C 


LASTCPDT 


DS 


IF 


240 


LASTCMND 


DC 


CL8' » 


2A8 


PREVCMND 


DC 


CL8« » 


2B0 


LASTEXEC 


DC 


CL8» » 


2B8 


PREVEXEC 


DC 


CL8' » 



Field Description, Contents, Meaning 



Initial prograa load of PSW 
Initial program load of CCW1 
Initial program load of CCW2 



PSW restart new PSW 
PSW restart old PSW 
Address of simulated OS CVT 
Address of nucleus address table 

External old PSW 
Supervisor call old PSW 
Program old PSW 
Machine-check old PSW 
Input/output old PSW 
Channel status word 
Channel address word 
Reserved for IBM use 
Interval timer 
Reserved for IBM use 
External new PSW 
Supervisor call new PSW 
Program new PSW 
Machine-check new PSW 
Input/output new PSW 
Processor logout area 



Reserved for IBM use 

Reserved for IBM use 

Monitor call class number 

Procrram ©"©"*■ recorder code 

Program event recorder address 

MONITOR CALL code 

Reserved for IBM use 

Save area for first 160 bytes of storage 

Floating-point register logout area 

General-purpose register logout area 

Extended control register logout area 



System name and date 
Installation identification 
Same of saved system loaded (via IPL) 
Address of device loaded (via IPL) 
Address of system disk 

Name of device causing last I/O interrupt 
Reserved for IBM use 
)7' FE service number 
Buffer for EIAGNOSE timer 



Current date - mm/dd/yy 

Current time - hh.mm-ss 

Current elapsed virtual time used 

Current elapsed processor time used 

Previous elapsed virtual time used 

Previous elapsed processor time used 

Last command issued 

Next to last command 

Last EXEC procedure 

Next to last EXEC procedure 
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NDCON 



Bexadeciial Field 
Displacement Name 



2C0 
2C8 
2D0 
2D8 



2E0 
300 
348 
34C 
350 
354 
358 



3A0 
3A0 
3A4 
3A8 
3AC 
3B0 
3B4 
3B8 
3BC 
440 
444 
446 
448 
44C 
44E 



450 



LASTLMOD DC 
LASTTMOD DC 
DATIPCMS DC 
CLKVALMD DC 



Field Description, Contents, (leaning 

CL8« ' Last module LOADMOD into main storage 

CL8 'ACCESS' Last module LOADHOD into transient area 

D'O' Date (mm/dd/yy) at last IPL CHS 

D'0» Time (STCK form) at midnight (0000 hours) 



M^cro and Text Library Pointers 



MACDIRC DC 8A(0) 

MACLIBL DC 18F'-1' 

TXLIBSV DC F'O' 

MACLBSV DC F'O' 

TOTLIBS DC F'O' 

TXTDIRC DC A(0) 

TXTLIBS DC 18F'-1' 

2ebu3 Dum£ Parameters 

DUMPLIST DS OD 

GRS015 DC A(GPHLOG) 

LOC0176 DC A(LCWSAVE) 

FIRSTDHP DC A(0) 

LASTDMP DC A(0) 

FRS06 DC A(FPRLOG) 

DMPTIT DC A(DHPTITLE) 

DC 4X'FF' 

DMPTITLE DC CL132' ' 

GLBLTABL DC F'O' 

DC H » ' 

S?C$202 S?C 202 

ERR$202 DC A (*+4) 

BR 14 

DC H'O' 

latch Monitor Information 

BATFLAGS DC 1X'00'~ A*1 



Bits def 


ined 


in BATFLAGS 


BATRON 


EQO 


X'80' 


BATLOAD 


EQO 


X«40' 


BATHOEX 


EQU 


X'20' 


BATRERR 


EQO 


X'10' 


BATCPEX 


EQO 


X'08' 


BATDSEX 


EQO 


X'04' 


BATHOVE 


EQO 


X'02' 


BATTERM 


EQO 


X»01« 



Address of macro library directories 
Current macro library names 
Library save area for TXTLIBS 
Library save area for HACLIES 
Total global chains (in bytes) 
Address of TEXT library directories 
Current TEXT library names 



DEEOG DUMP PLIST 

Address of GPR save area 

Address of low storage save area 

Address of first location to dump 

Address of last location to dump 

Address of IPR save area 

Address of dump title line 

Reserved for IBH use 

Dump title line 

Reserved for IBH use 

Dsed for alignment 

Common SVC for reentrant cede 

Dser will fill if necessary 

Return to caller 

Reserved for IBH use 



Batch flags 



451 



BATFLAG2 DC 



IX'OO' 



Batch monitor running 

Loading batch processor 

Suppress user job execution 

Batch reader error 

CP command executing 

User job executing 

HOViriLE executing from terminal 

Dser job being flushed 

A*2 More batch flags 



Bits def: 


Lned 


in BATFLAG2 


BATXLIM 


EQU 


X'80' 


BATXCPD 


EQD 


X'40' 


BATXPRT 


EQO 


X'20' 


BATXPUN 


EQD 


X'10» 


BATDCHS 


EQD 


X'08' 


BATIPLSS 


EQD 


X'04' 


BATSTOP 


EQO 


X'02' 


BATSYSAB 


EQD 


X'01' 



452 DC 2X'00' 

Batch Processor Entrj Points 



454 


ABATPROC DC 


A(0) 


458 


ABATABND DC 


A(0) 


45C 


ABATLIMT DC 


A(0) 


460 


ADSERST DC 


A(0) 


464 


DC 


2F'0' 



Dser job limit exceeded 
Processor time exceeded 
No. of printed lines exceeded 
No. of punched cards exceeded 
Disabled CHS command called 
Batch loading (via IPL) saved system 
Batch stopping after current job 
System abnormal termination 
in process 

Reserved for IBH use 



Main entry 

Dser job abend entry 

Dser job limits table 

Virtual machine restart entry point 

Reserved for IBH use 
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MDCCU 



Bexadecimal 
Displacement 



470 
490 
4D8 



4D9 
4DA 
4DC 
4E0 
4E4 
4E8 
4EC 
4F0 
4F0 
4F6 
4F8 
4FC 



500 
504 
508 
50C 
510 
514 
518 
51C 
520 
524 
528 
52C 
52E 

530 
534 
538 
53C 



54 
544 
54 8 
54C 
550 
554 
558 
55C 
55E 



Field 
Name 

DOS Librarj Pointers 
DOSLBSV DC F«0» 
DOSDIRC DC 8A(0) 
DOSLIBL DC 18F»-1» 
DOSFLAGS DC X»00» 

Bits defined in DOSFLAGS 



Field Description, Contents, Heaning 



Library save area for DOSLIES 
Address of EOS library directories 
Current EOS library naies 
A*3 DOS simulation flags 



DOSMODE 

DOSSVC 

DOS¥SAH 

DOSCOMP 

DOSPIO 



EQD 
EQU 
EQU 
EQU 
EQD 



VSHINSTL EQD 

DO SRC DC 
DC 
ALTASAVE DC 
ABGCOM DC 
ASYSCOH DC 
ADOSDCSS DC 
S¥C12SAV DC 
DOSFIRST DC 
DOSNDM DC 
DOSKPART DS 
APPSAVE DC 
DOSTRANS DC 

Free Storage 
MAINLIST DC 
MAIHSTRT DC 
FREELIST DC 
FREENUM DC 
HAINHIGH DC 
FREELOIE DC 
FREELOHR DC 
FREEDPPR DC 
ANOCEND DC 
ADSRAREA DC 
CORRSAVE DC 
CODE203 DC 
FRERESPG DS 

ADMSFRT DC 
VCADTLKP DS 
VCADTNXT DC 
VCADTLKi DC 



X«80« 
X«40' 
X»20» 
XMO» 
X»08' 
X»04» 

X'OO* A*4 

2X»00» 

V(LTASAVE) 

V (BGCOM) 

V(SYSCOM) 

A(0) 

F'O' 

A(0) 

H»0» 

H«0« 

V(PPSAVE) 

A(0) 

Pointers 
A(0) 

V(OSEHAREA) 
V(NDCEND) 
F«1» 

V(OSERAREA) 
?(NOCEND) 
V(TRAIJSAR) 
A(0) 

V(NOCEND) 
V(INITSDB) 
A(0) 
H«0' 
H»2' 

V(DHSFRT) 
A(DI!SLAD) 
A(DI!SLADN) 
A(DBSLADW) 



Console 1^0 Pointers 



CDRRIOOP DC 
PENDREAD DC 
PENDWRIT DC 
FSTFINRD DC 
LSTFINRD DC 
AINTRTBL DC 
AODTRTBL DC 
NDHFINRD DC 
NDHPNDWR DC 



DOS environment flag 

DOS SVC simulation flag 

EOS VSAM running flag 

DOS compiler running flag 

DOS printer indicator 

VSAM installation flag to relocate DCSS table 

EOS return code to user 

Reserved for IBM use 

Address of LTA save area 

Address of partition communication region 

Address of system communication region 

Address of EOS DCSS 

Work area for SVC 12 

Address of first DOSCB in chain 

Number of DOSCBs in chain 

Number of K-bytes in DOS partition 

Address of problem program save area 

Address of EOS transient area 



Address of first block of user free storage 
Address of the start of user free storage 
Address of first block of system storage 
Number of blocks of system storage 
High extend of user free storage 
Low extend of system free storage 
Lower limit of system free storage 
Upper limit of system free storage 
Address of end of nucleus storage area 
Address of beginning of user area 
Address of current save area 
Code number of last SVC 203 
Amount of user storage to reserve 

for CMS free storage (pages: >=2) 
EMSFRE work area 
EALR eguivalent of ADTLKP 
EALR eguivalent of ADTNXT 
BALR equivalent of ADTLKB 



A(0) Address of current I/O buffer 

A(0) Address of pending read operation 
A(CONSTACK) Address of pending write operation 

A(0) Address of finished read buffer 

A(0) Address of last finished read buffer 

A(0) Address of user input translate table 

A(0) Address of user output translate table 

H«0» Number of finished read buffers 

H*0« Number of pending write operations 
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NDCON 



Hexadecimal 


Field 






Displacement 


Name 








Loader Information 


560 


VMSIZE 


DS 


IF 


564 


ALDRTBLS 


DC 


1F«0» 


568 


STRTADDR 


DC 


1F«0» 


56C 


FRSTLOC 


DC 


1F»0» 


570 


LASTLOC 


DC 


IF'O' 


574 


LOCCNT 


DC 


1F»0» 


578 


LDRADDR 


DC 


IF'O' 


57C 


LDRRTCD 


DC 


1F»0' 


580 


PSW 


DC 


ID'O' 


588 


LDRFLAGS 


DC 


IF'O' 


58C 


PRHOLD 


DC 


IF'O" 


590 


TBENT 


DC 


H»0« 


592 


ONRES 


DC 


X»00' A*5 


593 


MODFLGS 


DC 


1X'00» A*6 




Bits def: 


ined 


in MODFLGS 




NOMAPFLG 


"equ 


X»80» 




CLEAROP 


EQD 


X«40» 




MODGNDOS 


EQO 


X»20» 




MODGNALL 


EQD 


XMO» 




SYSLOAD 


EQO 


X»08' 




MDPCALL 


EQU 


X»04» 




MOD 6 


EQD 


X»02» 




H0D7 


EQD 


X«01» 


594 


GET1 


DC 


1F'/0» 


598 


DSYM 


DC 


2F«0« 


SAO 


JSYH 


DC 


FiO» 


5A4 


NXTSYM 


DC 


C»Z« A*7 


5A5 




DC 


XL7»0» 


5AC 


ALIASENT 


DC 


1F»0' 


5B0 


DYNAEND 


DC 


1F»0» 


5B4 




DS 


3F 




QS Simulation 


1 Pointers 


5C0 


FCBTAB 


DS 


OD 


5C0 


FCBFIRST 


DC 


A(0) 


5C4 


FCBNOM 


DC 


H'O" 


5C6 




DC 


X'00» 


5C7 


OSSFLAGS 


DC 


X»00» A*8 




Bits def; 


Lned 


in OSSFLAGS 




COMPSWT 


'eqd 


X»80» 




OSSHND 


EQD 


X«40» 




OSRESET 


EQD 


X'20' 




OSWAIT 


EQD 


X'10' 




DYLD 


EQD 


X»08» 




DYLIBO 


EQD 


X»04» 




DYLIBNOH 


EQD 


X»02» 




DYMBRNM 


EQD 


X'01' 


5C8 




DC 


A(0) 


5CC 


LINKLAST 


DC 


A(0) 


5D0 


LINKSTRT 


DC 


A(0) 


5D4 


TAXEADDR 


DC 


A(0) 


5D8 


ATSOCPPL 


DC 


V(CPP) 


5DC 


DCBSAV 


DC 


1F'0« 



Field Description, Contents, Meaning 



Virtual storage size 

Address of loader tables 

Module starting address 

Module beginning address 

Module ending address 

Loader location counter 

Loader return address 

Loader return code 

Dser's starting PSH 

Loader flags 

Pseudo register counter 

Initialize table entries to zeros 

Unresolved reference bit for CMS loader 

Flags 



NOMAP flag 

CLEAR option flag 

Module generated with DOS option 

Module generated with ALL option 

Allow load greater than FREELCWE or less 

than transient 
Indicate module called by DMSMDP 
Reserved for IBM use 
Reserved for IBM use 

DMSLSY R1 save location 

DMSLSY work space 

D#SLSY uiiig«« i^^ntifier base 

First character of unique identifier 

Rest of unique identifier 

Alias entry point (dynamic load) 

Maximum load location (dynamic load) 

Reserved for IBM use 



FCE chain anchor 
Address of first FCB 
Humber of FCBs in chain 
Reserved for IBM use 
OS simulation flags 



Compiler switch 

DMSSMN unconditional flag 

Reset for OS 

Wait for OS 

Dynamic loading in process 

Omit dynamic library scan 

Dynamic library scan 

Linked via member name 

Reserved for IBM use 
Address of last OS linkage block 
Address of entry point of last module 
Terminal attention exit element address 
Address of IMP PLIST for TSC programs 
DCE restoration address 
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HDCCH 



Bexadecifflal 
Displacement 

5E0 



5E1 



5E2 



5E3 



5E4 
5E6 



5E7 



5E8 



Field 
Naie 

OPTFLAGS DC 



IX'OO' 



Bits defined in OPTFLAGS 



N0Ii5PEX 


"eqo 


X'80' 


NOIMPCP 


EQO 


x«ao» 


NOSTDSYN 


EQD 


X'20» 


NOABBREV 


EQO 


XMO' 


NOPAGREL 


EQD 


X»08' 


NOREAD 


EQO 


X'04' 


MISFLAGS 


DC 


1X»00» 


Bits def; 


Lse^ 


in MISFLAGS 


KXSilTCH 


"equ 


X»80' 


KOSWITCH 


EQU 


X«UO« 


RELPAGES 


EQU 


X'20' 


GRAFDEV 


EQD 


X'10» 


QSHITCH 


EQD 


X«08» 


NODDSK 


EQO 


X'OU' 


NEGITS 


EQD 


X«02» 


ATTNHIT 


EQD 


X'01» 


MSGFLAGS 


DC 


1X»00» 


Bits def: 


Lned 


in MSGFLAGS 


NOTYPOOT 


"eqd 


X»80' 


NOTYPING 


EQD 


X»40' 


NORDYHSG 


EQD 


X»20» 


NORDYTIM 


EQD 


XMO' 


REDERRID 


EQO 


X'08« 


NOERRHSG 


EQD 


X»04« 


NOERRTXT 


EQO 


X»02» 


SPECIF 


EQO 


X'01' 


DBGFLAGS 


DC 


IX'OO' ] 


Bits defined 


in DBGFLAGS 


DBGEXEC 


EQD 


X»80' 


DBGPGMCK 


EQD 


X'40' 


DBGEXINT 




X«20' 


DBGABN 


EQD 


X'10» 


DBGNSHR 


EQD 


X»08« 


DBGSHR 


EQD 


X»04' 


DBGRECUR 


EQD 


X'02« 




DC 


2X»00» 


EXECFLAG 


DC 


IX'OO' i 


Bit defined in EXECFLAG 



Field Description, Contents, Meaning 
A*9 Option flags 



No implied EXEC coimands 

No implied CP commands 

No standard synonyms 

No command abbreviations 

No automatic page release 

No automatic VM/370 console read 



A*13 



EXECRDN EQD X*80' 



PROTFLAG DC 



IX'OO' A*14 



Bits defined hj PROTFLAG 
PRFPOFF EQD X«80' 
PRFTSYS EQD X'UO' 
PRFDSYS EQD X»20» 



Miscellaneous flags 



Halt execution switch 

Halt tracing switch 

Release pages switch 

Graphics console 

Quiet switch for console read 

Do not access D-disk 

Negative return code from DMSITS 

Attention posted 



A*11 Message flags 



No typing - set by EXEC 
No typing - set by HT 
No ready message to te typed 
No time on ready message 
Error code to be typed in red 
No error messages to be typed 
No text on error messages 
Linefeed for typewriter CCi 

A*12 DEEDG flags 



DEEDG routine executing 

DEEDG entered by a program check 

DEEDG entered by an external interrupt 

DEEDG entered from DMSABN 

No shared segment present 

Shared segment present 

Recursion flag 



Reserved for IBM use 
EXEC flags 



EXEC command running 
Storage protection flags 



Storage protection is shut off 
System routine in transient area 
System routine in user area 



TSOFLAGS DC 



IX'OO' A*15 TSO flag byte 



Bit defined in TSOFLAGS 
TSOATCNL EQD X'80'~ 



Read canceled by attention 
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Eexadecimal 


Field 






Displacement 


Name 






5E9 


SOB FLAG 


DC 


1X«00» A* 




Bits def. 


LDed 


in SUBFLAG 




SUBREJ 


'equ 


X»08' 




SOBRTN 


EQD 


X'04' 




SUBINIT 


EQU 


X»02' 




SUBACT 


EQU 


X»01» 


SEA 


DCSSFLAG 


DC 


X'00» A* 




Bits def: 


Lned 


in DCSSFLAG 




DCSSAVAL 


"equ 


X«80» 




DCSSLDED 


EQU 


X«40» 




DCSSCPNV 


equ 


X'20» 




DCSSLDSD 


EQU 


XMO« 




DCSS7TNA 


EQU 


X'08« 




DCSSVTLD 


EQU 


X'04' 




DCSSOVLP 


EQU 


X'02' 




DCSSJLNS 


EQU 


X'01» 


5EB 




DC 


X»00» 


SEC 


ASYSNABS 


DC 


V(SYSNAMES) 


5F0 


ACMSSEG 


DC 


F»0» 


SF4 


ADMSLIO 


DC 


V{DBSLIO) 


5F8 


VCFSTLKP 


DC 


V(DHSLFS) 


5FC 


VCFSTLKH 


DC 


V(DMSLFSW) 




Nucleus 


address Table 


600 


SYSREF 


'ds 


OD 


600 


AFVS 


DC 


V {YJS) 


604 


AOPSECT 


DC 


V(OPSECT) 


608 


ADEVTAB 


DC 


V(DEVTAB) 


60C 


AFSTLKP 


DC 


V(FSTLKP) 


610 


AGETCLK 


DC 


V(DMSINM) 


61U 


AFSTLKS 


DC 


V(FSTLKW) 


618 


APIE 


DC 


V(PIE) 


61C 


AIADT 


DC 


V(IADT) 


620 


ADSER 


DC 


V(USERSECT) 


624 


ARDTK 


DC 


VCDBSDIOR) 


628 


ASCAHN 


DC 


V(DHSSCNN) 


62C 


ASSTAT 


DC 


A(0) 


630 


ATABEND 


DC 


V(TABEND) 


634 


ASOBSECT 


DC 


V(SnBSECT) 


638 


AOSMODL 


DC 


A(0) 


63C 


AHRTK 


DC 


V(DMSDIOW) 


64 


ASTRINIT 


DC 


VCDHSSTGST) 


644 


lADT 


DC 


V(ADTSECT) 


648 


AFREE 


DC 


V(FREE) 


64C 


AFRET 


DC 


V(FRET) 


6S0 


ADMSPIOC 


DC 


V(DMSPIOCC) 


654 


APGMSECT 


DC 


V(PGMSECT) 


658 


AIOSECT 


DC 


V(IOSECT) 


6SC 


ADMPEXEC 


DC 


V(DMSDBD) 


660 


ADIOSECT 


DC 


V(DIOSECT) 


664 


AABNSVC 


DC 


V(DKSABUUA) 


668 


ADMSERL 


DC 


V(DMSERL) 


66C 


ADMSCRD 


DC 


V(DMSCRD) 


670 


ADMSFREB 


DC 


V(DMSFREB) 


674 


ASVCSECT 


DC 


V(SVCSECT) 


678 


AADTLKP 


DC 


V{ADTLKP) 


67C 


AUPOFD 


DC 


V(DHSAUDUP) 


680 


ASTATEXT 


DC 


A(0) 


684 


AOSRET 


DC 


V(OSRET) 


688 


ACMSRET 


DC 


V{CBSRET) 



Field Description, Contents, Meaning 
CBS subset flag byte 



Subset command reject 

Subset return 

Subset initialization 

Subset active 

DCSS indicators 



CBSSIG segment exists 

CBSSIG loaded 

CP or invalid command issued 

Loading S-disk 

DBSS^T not available 

DBSS^T is loaded 

Virtual machine storage overlaid by ECSS 

CBSSFG just loaded nonshared 

Reserved for IBB use 

Address of CBS saved segment 

EALR equivalent of FSTLKP 
EALR equivalent of FSTLKi 
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NUCCM 



Hexadecimal 


Field 






Displacement 


Name 






68C 


ASCANO 


DC 


V(DHSSCNO) 


690 


AEXEC 


DC 


V(DMSEXC) 


694 


A START 


DC 


V(DHSLDRA) 


698 


AADTLKB 


DC 


V(ADTLKW) 


69C 


ADSABRV 


DC 


V(DSABRY) 


6A0 


AEXTSECT 


DC 


V(EXTSECT) 


6A4 


ASCBPTR 


DC 


V(SCBPTR) 


6A8 


ADMSROS 


DC 


A<0) 


6AC 


LDMSROS 


DC 


H'0» 


6AE 


CDMSROS 


DC 


H»0« 


6B0 


AACTLKP 


DC 


V(DMSLAF) 


6B4 


AACTNXT 


DC 


V(DMSLAFNX) 


6B8 


AACTFREE 


DC 


V(DMSLAFFE) 


6BC 


AACTFRET 


DC 


V(DKSLAFFT) 


6C0 


AADTNXT 


DC 


Y(ADTNXT) 


6C4 


ATRKLKP 


DC 


V(DHSTRK) 


6C8 


ATRKLKPX 


DC 


V(DHSTRKX) 


6CC 


AQQTRK 


DC 


V(DMSTCC) 


6D0 


AQQTRKX 


DC 


V(DMSTCCX) 


6D4 


AERASE 


DC 


V(DMSERS) 


6D8 


ATYPSRCH 


DC 


V(TYPSRCH) 


6DC 


AOPDISK 


DC 


V(DBSAOD) 


6E0 


AKILLEX 


DC 


Y(KILLEX) 


6E4 


ATFINIS 


DC 


V(DMSFNST) 


6E8 


ARDBOF 


DC 


V(DMSERD) 


6EC 


AHRBOF 


DC 


V(DHSBHR) 


6F0 


AFINIS 


DC 


Y(DMSFNS) 


6F4 


ASTATE 


DC 


VCDMSSTTE) 


6F8 


A STATE ii 


DC 


Y(DHSSTTW) 


6FC 


APOINT 


DC 


Y (POINT) 


700 


Terminal 


Buffe 
DS 


rs 
OD 


-7 rt A 
1 KIM 


\^Kja\^^ no 


CCW 


0,0,X'60»,0 


708 




CCH 


3,0,X«20»,1 


710 


CONINBLK 


DC 


A(0) 


714 




DC 


XLI'OA' 


715 




DC 


AL1(134) 


716 


CONINBOF 


DS 


CL134 


-J » n 




DS 


OD 


7A0 


CMNDLINE 


DS 


CL160 


840 




DS 


OD 


840 




DC 


CL8'EXEC» 


848 


CMNDLIST 


DS 


CL536 


A60 




DS 


OD 


A60 


CONSTACK 


DS 


CL320 


BAO 


Save Areas 
FREESAVE DS 


16F 


BEO 


BALRSAVE 


DS 


16F 


C2 


WAITSAVE 


DS 


16F 



Field Description, Contents, Meaning 



Cousole j.eau aud Wiite CCW 
NOP to get CE and DE together 



YSAM and AMSERV Control Words 
C60 DS OD 

Percent of Available User Storage To Reserve for 
GETYIS/FREEYIS oii When Running YSJB 



C60 


PCTYSAM 


DC 


H'50« 


C62 




DS 


1H 


C64 




DS 


IF 



50 percent for CMS/YSAM use 
Reserved for IBH use 
Reserved for IBM use 
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NOCON 



Hexadecimal Field 
DisplacemeDt Naie 



Field Description, Contents, Meaning 



C68 
C6C 
C70 

cm 

C78 
C7C 



C7D 
C80 
C84 
C88 
C8C 
C90 
C94 
CAO 



MSSiSSisa §£i IM £t i^QkhM (w^en in storage) 



ADIKQLAB 


DC 


A(X'FFFFFF') 


NDIKQLAB 


DC 


A(0) 


ARORTBL 


DC 


V(RURTBL) 


ADHSVIB 


DC 


V{DMSVIB) 


AVIPWORK 


DC 


A(0) 


VSAMFLG1 


DC 


X»00' A=t 


Bits def; 


Lned 


in VSABFLG1 


VSAMRON 


'eqd 


X»80» 


VSJOBCAT 


EQU 


X'40' 


VIPINIT 


EQU 


X'20» 


VSAMSERV 


EQU 


XMO» 


VIPSOP 


EQD 


X»08' 


VIPTCLOS 


EQU 


X'04' 


VSAMSOS 


EQU 


X»02' 




DS 


3X 


AVSAMSYS 


DC 


A(0) 


AAMSSYS 


DC 


A(0) 


AVSREOJ 


DC 


V($$BE0J4) 


AVSRHORK 


DC 


A(0) 


ACBLIST 


DC 


A(0) 




DS 


3F 




DS 


OD 



Set to A(IKQLAB) when it is in storage 
Set to end of IKQLAB when in storage 
VSAM resource table address 
Address of VSAM interface bootstrap 
Address of EHSVIP work area 
A*18 VSAM information flag 



VSAM system loaded 

VSAM job catalog active 

DMSVIP has teen initialized 

CMSAHS system loaded (AMSERV running) 

OS interface SVC 2 call 

OS TCLOSE call 

OS AMSERV running 

Reserved for IBM use 
Address of VSAM saved system 
Address of CMSAMS saved system 
DMSVSR entry point from VSAB $$EACLOS 
Address of EMSVSR work area 
ACE list built by OPEN/CLOSE 
Reserved for IBM use 
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OPSECT 

OP SECT: MAJQI CSECT FOR ALL I/O OPERATION LISTS 

OPSECT describes the fields used by several programs as parameter lists for reading and 
writing on disks and other devices. The OPSECT CSECT is pointed to by the AOPSECT field 
in NDCON. 



r 
01 




CMSOP 


' "T 


81 




FILENAME 




101 




FILETYPE 




181 


FILEMODE 1 FILEITEM | 


FILIBDFF 1 

i 


201 




FILEBYTE | FILIFORM | FILECODT | 






FILEREAD | 


1 
SAVER14 1 


301 




SAVER15 1 


SAVERO 1 


381 




SAVER 1 1 


CMSNAME 1 


401 




CMSNAME (cont.) | 


CONREAD 1 


48 i 




CONREAD (cont.) | 


CONRDBDF | 


50 1 


A*1 


1 I CONRDCNT I///////////////////////////I 


581 




WAITLIST 




601 




CONWRITE 




68 1 




CONWRBDF 1 A*2 


CONHRCNT 1 


701 




WAITLST 




781 




WAITDEV 1 




801 




1 


REAELST 1 


881 




READLST (cont.) ! 


REBDFF i 


901 


RDCCW 1 RDCODNT | 


PDNCHLST I 


98; 




PDNCHLST (cont.) 1 


PDNEDFF 1 


AOi 




PONCOUNT 1 


PRINTLST 1 


A8| 




PRINTLST (cont.) | 


PRBDF 1 


B0| 




PRCNT 1 


TAPELIST 1 


B8| 




TAPELIST (cont.) 1 


TAPEOPER 1 


C0| 




TAPEOPER (cont.) 1 


TAPIDEV 1 


C8| 
u 


A*3 


1 TAPEBDFF | 


TAPESIZE 1 
. . ,._ .. .. ... J 
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OPSECT 



DO I 
I 

D8| 
I 

E0| 



TAPECODT 



CLOSIO 



CLOSIO (cont.) 



CLOSIODV 



CLOSIODV (cont.) 



I 1 

E8 I //////////////////////////// I /////////////////////////// . 
.//////////////////////////// I/////////////////////////// . 
.////////////////////////////I///////////////////////////. 

. //////////////////////////// I /////////////////////////// . 

I 1 

118 1 EXLEVEL | EXF1 | 

I , 

1201 EXNUM I EXAED | 

I 1 

128 1 //////////////////////////// I /////////////////////////// I 

I 1 

130 1 FCBIO I A*1 I 

I J 



Hexadecinal Field 
Eisplacement Naae 



Field Description, Contents, Heaning 





8 
10 
18 
1A 
1C 
20 
24 
26 
28 



Min 1/0 Q£§iation List 



PLIST 


DS 


OD 


CMSOP 


DS 


CL8 


FILENAME 


DS 


CL8 


FILETYPE 


DS 


CL8 


FILEHODE 


DS 


CL2 


FILEITEK 


DS 


H 


FILEBOFF 


DS 


F 


FILEBYTE 


DS 


F 


FILEFORM 


DS 


CL2 


FILECOOT 


DS 


H 


FILEREAD 


DS 


F 



I/O operation command word 

Filename 

Filetype 

Filemode 

Item identification number 

Input/output buffer 

Data count 

File format: fixed/variable records 

Records per block 

Read data count 



POINTERS EQD FILEITEM 

AFST EQD FILEBUFF 

lOAREA EQO FILEBOFF 

lOLENGTH EQU FILEBYTE 



Buffer area location 
Buffer length 



Imm ed iate Register Save Area 



2C 


SAVER 14 


DC 


F«0» 


30 


SAVER 15 


DC 


F'0» 


34 


SAVERO 


DC 


F*0« 


38 


SAVER 1 


DC 


F»0» 


3C 


CHSNAHE 


DC 


CL8«FILE» 




Console 


Parameter Lists 


44 




DS 


OF 




Read Console 




44 


CONREAD 


DC 


CL8»HAITRD' 


4C 


CONRDBOF 


DC 


V(CHNDLINE) 


50 


CONRDCOD 


DC 


C»D» A*1 


51 




DC 


X'0« 


52 


CONRDCNT 


DC 


AL2(0) 


54 




DC 


F«0« 




Console 


Hait 


List 


58 


WAITLIST 


DS 


OF 


58 




DC 


CL8«C0NWAIT» 



Temporary R14 save 

Temporary R15 save 

Temporary RO save 

Temporary R1 save 

Default filename 



Terminal read 

Address of input buffer 

Translate code 

Data byte count 
Reserved for IBM use 
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OPSECT 



Hexadecimal Field 
Eisplacement Naae 



Field Description, Contents, Beaning 



60 
60 
68 
6C 
6D 
6E 



70 
70 
78 
7C 
80 



84 
84 
8C 
90 
92 



94 
94 
9C 
AO 



A4 
A4 
AC 



B4 
B4 
BC 
C4 
C8 
C9 
CC 
DO 



D4 
D4 
DC 
E4 
E8 



118 

lie 

120 
124 
128 



130 
134 



Write Console 
CONWRITE DS 


OF 




DC 


CLS'TYPLIN* 


CONWRBOF 


DC 


A(0) 


CONIRCOD 


DC 


C'B' A*2 




DC 


X»00« 


CONiECNT 


DC 


AL2(0) 


Wait Parameter 
WAITLST DS 


List 
OF 




DC 


CL8»WAIT» 


WAITDEV 


DC 


CL4«C0H1» 




DC 


F'O' 




DC 


F»0« 


Reader Parameter List 
DS ~ OF 


READLST 


DC 


CL8«CARDRD« 


RDBOFF 


DC 


1(0) 


RDCCW 


DC 


H«0» 


RDCODNT 


DC 


H»0« 



Location of message text 
Color code 

Length of message text 



Address of EHSCHT 

Symbolic address of console 



Card Punch Parameter Li st 
PDNCHLST DS ~ OF 

DC CL8»CARDPH» 
PDNBOFF DC A (0) 
PONCODNT DC A(0) 

Printer Parameter List 



Buffer address 
CCW hyte count 
Bytes actually read 



Punch buffer address 
Punch CCW count 



Printer buffer address 
Printer data count 



Tape operation command 
Tape symbolic device 
Set mode 
Buffer location 

Tape counter 

Close Out Device Dependent Data Set on Unit Record Equip ment 
CLOSIO DS OF 

DC CL8«CL0SI0« Operation 
CLOSIODV DC CL8* » Device type 

DC 4X»FF« 

DC 6D*0» Reserved for IBM use 



PRINTLST DS 


"of 


DC 


CL8»PRINTR» 


PRE OF DC 


A(0) 


PECBT DC 


A(0) 


Tape Parameter 
TAPELIST DS 


List 
OF 


DC 


CL8»TAPEI0' 


TAPEOPER DC 


CL8» » 


TAFEDEf DC 


CL4'xAPl' 


TAPEMASK DC 


X«00» A*3 


TAPEBDFF DC 


AL3(0) 


TAPESIZE DC 


F'O" 


TAPECOOT DC 


F«0« 



Sto ra ge for EXEC Bootstrap 



EXLEVEL 
EXF1 
EXNOH 
EXADD 



DC 
DC 
DC 
DC 
DC 



F«0« 
F»1« 
F'O* 
F«0» 
2F»0» 



EXEC level 

Follows EXEC level 

number of doublewords of free storage 

Address of IXECTOR in storage 

Reserved for IBH use 



Storage for OS Macro Simulat io n Routines 

FCBIO DC a70) " ~ Address of last FCB used during I/O 

OSIOTYPE DC X»DD» A*4 OS access method type 
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OSFST 



OSFST: OS FILE STATUS TABLE 



OSFST describes the fields of an OS file status tatle. When an OS disk is accessed, 
DMSROS obtains storage from CMS free storage, builds and fills in an CSFST block, which 
is comparable to a CMS FST block. This block is released by DMSALD. 





8 

10 

18 

20 



OSFSTFM 



I /////////// I OSFEIBLK I 0SFSTF7F 



OSFSTLRL 



I A*1 I /////// I A*2 I A*3 



OSFSTNXT 



OSFSTCBB 



OSFSTEND 



OSFSTESN 



H8 



50 



OSFSTXTN 



FO 



F8 



100 



108 



110 



OSFSTNTE 



OSFSTTRK 



1 OSFSTDSK I CSFSTTIP 



I //////////////////// 



I /////////////////////////// 



/////////////////////////// I 



OSFSTBEH 



OSFSTMEM (cont.) 



I /////////////////////////// I 

J 



Hexadecimal Field 
Bisplacement Name 



OSFSTFM DS 
DS 
OSFSTBLK DS 
OSFSTFVF DS 
OSFSTLRL DS 
OSFSTRFM DS 
DS 
OSFSTFLG DS 



1H 
1H 
1H 
1H 
IF 
IX 
IX 
1X 



A*1 
A*2 



Field Description, Contents, Meaning 

Disk node 

Reserved for IBM use 
Block size 
Fixed/variable flag 
Logical record size 
OS record foraat 
Reserved for IBM use 
Flag byte 



F 
10 
14 



liis defined in OSFSTFLG 
OSFSTALT EQD X»80' 



OSFSTDBK 


EQD 


X't»0» 


OSFSTMVL 


EQU 


X»08' 


OSFSTDM? 


EQU 


X'02» 


OSFSTRSH 


EQD 


X»01« 


OSFSTXNO 


DS 


IX 


OSFSTNXT 


DS 


IF 


OSFSTCHR 


DS 


5X 



A*3 



Alternate track indicator 
Block size not specified in DSCE 
Multiple volume data set 
Dnmoveable data set 
Indicates point+1 just issued 

Number of data extents on disk 

Next OS FST 

CCHHR of last I/O operation 
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OSFST 



Hexadeciial Field 
Displacement Nane 



19 
IE 
4A 



F4 

F6 

F8 

FD 

100 

104 

IOC 

114 

118 



OSFSTEND DS 
OSFSTDSN DS 
OSFSTXTN DS 



5X 

HHC 

170X 



Bits defined in OSFSTXTN 
OSFSTEXU EQO OSFSTXTli*30 



OSFSTDSK 


DS 


1H 


OSFSTTYP 


DS 


1H 


OSFSTNTE 


DS 


5X 




DS 


3X 


OSFSTTRK 


DS 


IF 




DS 


2F 


OSFSTMEH 


DS 


CL8 




DS 


IF 




DS 


OD 



Field Description, Contents, Heaning 

Current extent end 

Data set naie 

Data extents description 



Location of fourth extent fron DSCB3 

Disk address (Ocuu) 

Disk device type (see OSADT for type flags) 

Osed to save CCEHR for NOTE macro 

Reserved for IBH use 

No. of tracks per cylinder 

Reserved for IBH use 

Partitioned data set member name 

Reserved for IBM use 



OSFSTLTH EQO (*-OSFST) /8 



OS FST length in doutlewords (X»35») 
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0¥SECT, PCTAB 



OVSECT: DESCRIBES THE FIRST FEH LOCATIONS OF DHSOVS 



OVSECT is used by lodule DMSOVS to provide trace information requested by SVCTRACE. 



I 

I 

8 I 



OVSGO 



AWAIT 



AERR 



LEMOVS 



Hexadecimal Field 
Displacement Name 






OVSGO 


B 


*-* 


4 


AERR 


DC 


A(0) 


8 


AWAIT 


DC 


A(0) 


C 


LENOVS 


DC 


A(0) 



Field Description, Contents, Heaning 

Branch to this point for TRACE 

Address of IHSEHR 

Address of CONWAIT 

Length of DHSOVS doutlewords 



PCTAB: PROGRAM CHECK OPTION TABLE 

PCTAB is used by DOS/VS routines in the event of a program check. The address of PCTAE 
is in bytes X'64» and x'65» of the partition communication region (BGCCH) . 



I 



PCROUT 



PCSAVE 



Hexadecimal Field 
Displacement Name 

PCTAB 

PCROUT 



EQO *-8 
DC F » ' 



PCSAVE 



DC 



F»0 



Field Description, Contents, Heaning 

Program check option table 

PCRODT = when no STXIT macro was issued 
= address of user program check 

routine (indicating that the 

STXIT macro was issued) 
= complement of the address of the 

user program check routine 

(indicating that specified routine 

in the user STXIT macro was 

already in use) 
PCSAVE = when no STXIT macro was issued 
= address of user save area 

(indicating that the STXIT 

macro was issued) 
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PESSECT 

PDSSECT; DIRECTORY TABLE FOR BPAM SIMULATION 

PDSSECT describes the fields of the in-storage directory that is used in CS siiulation of 
EPAM. The in-storage directory is built dynamically by DMSSVT froB CHS free storage. 



I 
I 



DIRNAME 



DIRPTR 



8 I A*1 I A*2 I CORESIZE | PESELKSI | A*3 I //////I 



Hexadeciaal 


Field 






Displacement 


Naae 









DIRNAME 


DS 


3H 


6 


DIRPTR 


DS 


1H 


8 


TEMPBYTE 


DS 


IX 


9 


NEHBLKS 


DS 


IX 


A 


CORESIZE 


DS 


1H 


C 


PDSBLKSI 


DS 


1H 


E 


CHNGBYTE 


DS 


IX 


F 




DS 


1X 


10 


PDSDIR 


DS 


OF 



Field Description, Contents, Meaning 

HACLIE identifier 

Item pointer to start of directory 
A*1 If byte has dollar sign ($) , 

then PES is in $PDSTEMP file 
A*2 No. of new blocks added to EDS by STOW 

Size of dictionary in bytes 

Block size of dictionary 
A*3 Indicates updates to dictionary 

Reserved for IBM use 

Start of in-storage dictionary 
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PGMSECT 



PGMSECT: PROGRAM INTERRDPT WORK AREA 



PGMSECT describes the fields used by DMSITE for saving registers, old ESS, and other data 
for handling program interrupts. 

The PGMSECT CSECT is pointed to by the APGMSECT field in NDCON. 




8 
10 
18 
28 
30 
38 
40 



DEBPSH 



I /////////////////////////// 



PICADDR 



OPSH 



OPSH (cont.) 



Registers 



TEMPOLD 



TEMPNEH 



R13AREA 



PSAVE 



78 



80 



88 



90 



SCBWOEK 



SCBSAT13 



ADPIE 



Hexadeciaal Field 
Displacement Name 



SCBPTR 



SCESAV12 



SCBSAV14 





8 

8 

C 

14 



28 
30 
38 
3C 
7C 



Field Description, Contents, Meaning 



Storage for Program Interrupt Routine (EMSITP) 
F«0*,V(DMSDBG) Point to debug 

Reserved for IBM use 
Program interrupt element 
PICA address from recent SEIE 
Old PSW after program interrupt 
Registers are: R14, R15, HO, El, and R2 
End program interrupt element 

Work area 

Work area 

Saved R13 

Registers saved at interrupt time 

Pointer to first STAE control block 



STAEBIT EQO X»80» 
STAIBIT EQD X'40' 
RETRYBIT EQU X'20» 



DEBPSW 


DC 


F«0*,V( 




DC 


IF 


PIE 


DS 


OD 


PICADDR 


DC 


F»0' 


OPSW 


DC 


2F'0' 




DC 


5F»0» 


♦ EPIE 






TEMPOLD 


DC 


8X'00» 


TEHPNEW 


DC 


8X»00» 


R13AREA 


DC 


F«0» 


PSAVE 


DC 


16F«0« 


SCBPTR 


DC 


F»0« 


Bits def 


ined 


is SCBPTR 



80 


SCBWORK 


DC 


A(0) 


84 


SCBSAV12 


DC 


A(0) 


88 


SCBSAV13 


DC 


A{0) 


8C 


SCBSAV14 


DC 


a(0) 


90 


A UP IE 


DS 


A 



Address of work area for STAE exit routine 

Address of R12 save area for DMSSAB 

Address of R13 save area for DMSSAB 

Address of H14 save area for DMSSAB 

Address of user's PIE, in SPIE exit 
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PIEAEB 



PIBAER; PROGRAM INFQRHATION BLOCK 

PIBADR contains a save area address and interrupt information. PIEADB is invoked by the 
PIBTAB macro and is often referred to by this macro name. The PIEPT field in the EGCCK 
block points to the PIBTAB CSECT. 



I A*1 I A*2 I 
I 

8 I 



PIBLOGID 



PIBSAVE 



PIBSAV2 



I A*3 I A*t» I A*5 I A*6 | 
I 



Hexadecimal Field 
Displacement Name 





1 

2 

4 


PIBFLG DS 
PIBCNCL DS 
PIBLOGID DS 
PIBSAVE DS 


X 
X 

XL2 
XL4 


A*1 
A*2 




Bits defined 


in PIBSAVE 






ARFLG EQD 


PIBADR*8 




8 
C 
D 
E 
F 


PIBSAV2 DS 
PIBPOBAS DS 
PIBLDBID DS 
PIBLDBNO DS 
PIBFLG2 DS 


xia 

X 
X 

c 

c 


A*3 
A*4 
A*5 
A*6 



2 
4 


ORG 
PIBCOMRA DS 
SYSLDBX DS 
INTINFO DS 


PIBADR 
XL2 
XL2 
XL4 






Bits defined 


in INTINFO 






SVCIC EQD 


INTINFO+3 




8 

C 

E 


PIBECB DS 

PIBPIK DS 

DS 


XL4 
XL2 
XL2 





Field Description, Contents, Meaning 

Flags 

Cancel code 

SYSLOG ID 

Address of save area 



Save area address 

Address of system save area 

PDE assign flags 

LDE number of first problem program LDB 

Number of LDBs 

More flags 

PIE extension DSECT 
Communications region address 
System class LOB address 
Interrupt information 



SVC interruption code 

ECE address 

Program interrupt key 

Reserved for IBM use 
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PIE2TAB 



PIB2TAB: PROGRAM INFORMATION BLOCK EXTENSION 



PIB2TAB describes the entries in the PIE2TAE block, which is an extension of the EIETAE 
block. For each PIB table entry, an entry exists in the PIE table extension block 
(PIB2TAB) . 

The PIB2PTR field in the BGCOM block points to the PIE2TAB block. 



I PIBC0MR1 I SYSLDEX | 

I 



INTIHFO 



PIBECB 



I PIEPIK I ////////////// I 

1 



Hexadecimal Field 
Displacement Name 



PIBCOMRI DS 
SYSLOBX DS 
INTINFO DS 



XL2 
XL2 
XL4 



Field Description, Contents, Meaning 

Address of communications region 

System LUE index 

Dsed for interruption code 



Bits defined in INTINFO 
SVCIC EQO INTINFO+a 



SVC interrupt code 



PIBECB DS XL4 

PIBPIK DS XL2 

DS XL2 



Address of termination ECB, if any 
Program interrupt key 
Reserved for IBM use 
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POEAEB 



I PDBAER: PHYSICAL UNIT BLOCK TABLE 



I POBADR defines the fields of a pliysical unit 
I routines. Both DSECTs define the same storage. 



tlock table as used by CHS and/or DCS 



I • For Use by CMS Routines (MAPPDB macro) 

I The simulated PDBADR DSECT has eighteen 8-byte entries, one for each device supported by 
I CMS. The simulated PDBADR DSECT is invoked by the MAPPDB macro. 



I 



PDBCDD 



I////// I A*1 I A*2 I A*3 I A*U I A*5 | 

J 



Hexadecimal Field 
Displacement Name 






PDBCDD DS 


XL2 




2 


DS 


X 




3 


PDBDSKM DS 


X 


A*1 


a 


PDBDEVT DS 


X 


A*2 


5 


PDBTAPH1 DS 


X 


A*3 


6 


PDBTAPM2 DS 


X 


A*U 


7 


PDBTAP7 DS 


X 


A*5 



Field Description, Contents, Meaning 

Channel and device number 

Reserved for IBM use 

Disk mode if assigned DASD 

Device type code 

CMS tape set mode attributes 

DOS tape set mode attributes 

7-track indicator 



I • For Dse by DOS/VS Routines (PDBTAB macro) 

I The PDBADR DSECT is invoked by the PDBTAE macro. The address of PDBTAE is at 
I displacement X'40» of BGCOM. 



! PDBCHANN !/A*1//! A*2 ! A*3 ! A*4 ! A*5 ! A*6 ! 

j "~ — :: — : — :: — '. — :: — : — :: — : — : — ; 



A*7 I 



Hexadecimal Field 
Displacement Name 






PDBCHANN 


DS 


XL2 




2 


PDBCHQPT 


DS 


X 


A*1 


3 


PDBERR 


DS 


X 


A*2 


4 


PDBDEVTY 


DS 


X 


A*3 


5 


PDBOPTN 


DS 


X 


A*4 


6 


PDBCSFLG 


DS 


X 


A*5 


7 


PDBJCFLG 


DS 


X 


A*6 


8 


NEXTPDB 


DS 


X 


A*7 




PDBWIT 


EQD 


♦-PDBADR 






PDBPTR 


EQD 


NEXTPDB 





Field Description, Contents, Meaning 

Channel and device number 

Reserved for IBM use 

Error retry counter or TEB point 

Device type code 

Set mode command or other options 

Channel scheduler flags 

Job control flags 

First byte of next PUB entry 

Length of PDB table 
Pointer to original PDB 
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PUBOWNER 



POBOWNER: PHYSICAL OHIT BLOCK OWMERSHIP TABLE 



PDBOWNER contains a 2-byte entry for each entry in the POB table. For CBS/DCS, there are 
eighteen 2-tyte entries. The address of the PDEOHNER table is in the SYSCOK block in the 
DOSCON CSECT of NOCON. 



I 



POBOWNER 



20 I 



Hexadecimal Field 
Displacement Name 



PUBOWNER DS 
DC 



Field Description, Contents, fleaning 



OH PUB ownership table 

18X»0001» PDB owner 



PUBOWNER entries have the following meanings: 



Bite 



Value 
X»00» 




X«40« 


1 


X'01» 



Meaning 

The physical unit is reserved 

CBS is waiting for the volume to be mounted 

Background partition owns the physical unit 
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SSAVE 



SSAYE; SYSTEM SAVE AREA 

SSAVE is used by DMSITS to save the value of the SVC old PSi, the caller's registers, and 
other necessary control information required to process the SVC and return to the caller. 
Since SVC calls can be nested, several of these save areas can exist at one time. The 
system save area is dynamically allocated in protected free storage. SSAVE is invoked 
via the CMSAVE macro. 






A*1 1 A*2 1 CODE 


1 


CALLER 


1 

1 


8 


CALLEE 1 


10 


OLDPSW 1 


18 


NEnBET 




EERET 




20 


EGPRO 




EGPR1 




28 


EGPR2 




EGPR3 




30 


EGPR4 




EGPR5 




38 


EGPR6 




EGPR7 




40 


EGPR8 




EGPR9 




48 


EGPR10 




EGPE11 




50 


EGPR12 




E6PR13 




58 


EGPR14 




EGPH15 


1 


60 


EFPRO 1 


68 


EFPR2 1 


70 


EFPR4 1 


78 




EFPR6 




1 

1 


80 


CHKWRDI 




SSAVENXT 




88 


SSAVEPRV 




DSAVEPTR 




90 


OSTEHP 


1 a*3 1 


KEYS 




98 


KEYS (cont.) 




XGPBO 




AO 


XGPR1 




XGPB15 




A8 


XCOUNT 

L 




CHKWRD2 


J 
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SSA?E 



Bexadeciial 


Field 






Displaceient 


Naie 









0?IHD 


DS 


X 




TYPFLAG 


DS 


BL1 




Bits def 


ined 


in TYPFLAG 




TPFERT 


"eqd 


X'SO"* ' 




TPFNS 


EQU 


X»40' 




TPFR01 


EQD 


X»20» 




TPFDSR 


EQU 


XMO* 




TPFACB 


EQU 


X'08' 




TPFSV3 


EQD 


X»02« 




TPFSVO 


EQD 


X«01» 


2 


CODE 


DS 


H 


4 


CALLER 


DS 


A 


8 


CALLEE 


DS 


D 


10 


OLDPSW 


DS 


D 


18 


NRMRET 


DS 


A 


1C 


ERRET 


DS 


A 


20 


EGPRS 


DS 


OF 


20 


EGPRO 


DS 


F 


24 


EGPR1 


DS 


F 


28 


EGPR2 


DS 


F 


2C 


EGPR3 


DS 


F 


30 


EGPR4 


DS 


F 


34 


EGPR5 


DS 


F 


38 


EGPR6 


DS 


F 


3C 


EGPR7 


DS 


F 


40 


EGPR8 


DS 


F 


44 


EGPR9 


DS 


F 


48 


EGPRIO 


DS 


F 


4C 


EGPR11 


DS 


F 


50 


EGPR12 


DS 


F 


54 


EGPR13 


DS 


F 


58 


EGPR14 


DS 


F 


5C 


EGPR15 


DS 


F 


60 


EFFRS 


DS 


OD 


60 


EFPRO 


DS 


D 


68 


EFPR2 


DS 


D 


70 


EFPR4 


DS 


D 


78 


EFPR6 


DS 


D 


80 


CHKHRD1 


DC 


C»ABCD» 


84 


SSAVEHXT 


DS 


A 


88 


SSA?EPR7 


DS 


A 


8C 


OSA¥EPTR 


DS 


A 


90 


OSTEMP 


DS 


F 



Field Description, Contents, Beaning 

A*1 Override indicator: 0, 1, 2, and 3 
A*2 SVC-type flag tyte 



Error return desired 

No save area allocated 

Return callee's R0-R1 to caller 

Oser SVC call 

OS 7SSM SVC request 

SVC 203 

OS siiulaticn SVC 

SVC 203 code value 

Address of SVC caller 

Name of routine being called 

SVC old PS« of caller 

Address for noraal return 

Address for error return 

General-purpose registers at entry to SVC 

RO 

R1 

S2 

R3 

R4 

R5 

R6 

R7 

R8 

R9 

RIO 

Rll 

H12 

R13 

R14 

R15 

Floating-point registers at entry 

FPHO 

FPR2 

FPH4 

FPR6 

Check word one 

Address of next SSAVE area 

Address of previous SSAVE area 

Address of corresponding user save area - see 

DSAVE ESECT 
Teaporary work area for OS siiulation 

routines 



94 
95 



9C 
AO 
A4 
A8 
AC 



DMSKEY Key Stack 
KEYMAX EQD 7 



KEYP 
KEYS 



DC 
DS 



X«00» 
(KEYIIAX)X 



Maxiiua nuiter of keys in stack 

A*3 Number of keys in stack 
Key stack 



The Following Fields Are Filled in Only by DJSOVS, the SVCTRACE 

Subrouting 

XGPRO DS F Extra copy of EGPRO 

XGPRI DS F Extra copy of EGPRI 

XGPR15 DS F Extra copy of E6PR15 

XCODNT DS F Extra copy of SVCODNT 

CHKSRD2 DC C'EFGH* Check word two 

SSAVESZ EQD {*-SSAVE+7) /8 Size of systei save area in dcublewords (XM5») 
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SUESICT 
SDBSECT: SUBSET WORK AREA 

SOBSECT defines the fields in the SUBSET work area which is used ty CBS SUBSET ccinand 
processing and abend recovery. 

The SUBSECT block is pointed to by the ASDESICT field in NUCON. 



I 



28 I 



HO i 



50 I 
I 

58 I 
I 

60 i 



68 



70 



78 I 



90 I 





HMSGBUF 


1 


CMSTIM 1 


STARS 1 

1 


r 
1 


1 


ASUBRET 1 


STAESAV 


1 


SPIESAV 1 


SWTCHSAY 


1 


ASUBIST 1 


ASUBSTAT 1 1 

1 


EBRNDM I 




TIMBUF 


1 
1 



Hexadeciaal Field 
Displacement Naae 






RMSGBUF 


DS 


10F 


28 


CMSTIH 


DS 


OF 


28 




DC 


CL8«CMSTIME 


30 




DS 


F 


34 




DS 


F 


38 




DS 


A 


3C 




DS 


F 


40 




DS 


OF 


40 


STARS 


DC 


CL8«*» 


48 




DC 


CL8«*« 


50 




DC 


CL2»*» 


54 




DS 


OF 


54 


ASUBRET 


DS 


F 


58 


STAESAV 


DS 


F 


5C 


SPIESAV 


DS 


F 


60 


SiTCHSAV 


DS 


F 


64 


ASUBFST 


DS 


F 


68 


ASUBSTAT 


DS 


F 


70 


ERRNUM 


DS 


D 


78 


TIMBUF 


DS 


4D 



Field Description, Contents, Meaning 

Buffer area for formatting time message 
PLISI to obtain time from EHSIHM 

Virtual machine time used 

Total processor time used (CP+CBS) 

Address of time buffer 

Message length (filled in by CMSTIME) 

PLIST for ACTLKP (used by SUBSET) 



Subset address for storage areas 
Return address to caller 
STAE save area 
SPIE save area 



Work area for error return code 

Work area for DHSIHM to store date and time 



Section 2. CHS lata Areas and Control Blocks 233 



SVCSECT 



SVCSECT: SVC INTERHDPT STORAGE 



SYCSECT describes the fields used by DHSITS in handling SVC interrupts. In SVCSECT block 
is built dynamically when an SVC is issued. The first SVCSECT is pointed to by the 
ASVCSECT field in HUCON; if SVCs are nested, the chain of SVCSECT blocks is processed 
using the CDRRALOC and LASTALOC fields. 






r - ■ ■ ■ ■ 

JNUHB 


1 JFIRST 1 


8 


JF4 


1 JLAST 1 


10 


A*1 I//////I SVCAB 


1 CDRRALOC 1 


18 


LASTALOC 


1 DEPTH 1 


20 


ADMSOVS 


1 OVEPF 1 OVBTF | 


28 


OVAPF 1 OVATE 


1 A* 2 I////////////////////I 


30 




SVCSAVE 1 



78 I 



NRHSAV 



158 
160 
168 
170 
178 
180 
188 
190 
198 
lAO 
1A8 
IBO 
1B8 
ICO 
1C8 
1D0 
1D8 
1E0 



/////////////////////////// I 



SVCODNT 



SVCSTOP 



SVLAD 



SVLADH 



SVLFS 



LOADLIST 



LOADNAHE 



(Literals are loaded into this area) 



(The literals here are frci the origin) 



LOADSTRT 



(Hexadecinals are entered in this area) 



/////////////////////////// I /////////////////////////// 



HODLIST 



DDHCOH 



A*3 I 



ZEROS 



TRAHSRT 



TRABSRT (cent.) 



I A*** I AETRANS 



TEHP02 



/////////////////////////// I /////////////////////////// 



//////////////////////// ///\/ /////////////// /////////// 



RGPRO 



RGPHI 
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SVCSECT 



1E8 
1F0 
1F8 
200 
208 
210 
218 
220 
228 
230 
238 
240 



r 


RGPR2 




RGPS3 




RGPR4 




RGPH5 




RGPR6 




RGPB7 




RGPR8 




RGPR9 




RGPR10 




RGPR11 




RGPR12 




RGPR13 




RGPR14 




RGPR15 


1 RFPRO 


1 HFPH2 


1 RFPE4 


1 RFPR6 






HRHUSAY 





Ecxadecinal Field 
Displacefflent Naae 



OS¥CTBL DS 

Kee;g Next Four 
JNOKB DC 
JFIRST DC 
JF4 DC 
JLAST DC 



OF 

in Order 
F'O* 
A (*-*) 
F«4« 
A(*-*) 



Field Description, Contents, Heaning 
Oser SVC table 






uuaujc J. 



Address of first iten (if any) in table 
Loop increment for BXLE 
Address of last item in table 



Start-up Fla^s — Ijndicate System Parameter Fla^ for the Ca l led R out ine 



CT?T -ktl 



T>T lint 



Bits defined in SFLAG 
SFSYS EQO ~ X«80» 
SFTRH EQO X«aO» 
SFNOC EQO X»20« 
SFREN EQO X'OV 



11 




DC 


X»00« 


12 


SVCAB 


DC 


H»0» 


14 


CDRRALOC 


DC 


A(0) 


18 


LASTALOC 


DC 


A(0) 


1C 


DEPTH 


DC 


F»0« 




Information 


for SVCTR 


20 


ADHSOVS 


DC 


A(0) 


24 


OYBPF 


DC 


BL2"0" 


26 


07BTF 


DC 


BL2"0n 


28 


OYAPF 


DC 


BL2"0" 


2A 


OVATF 


DC 


BL2"0" 



System flag — SVC protect key is zero 
Transient area routine — system mask is off 
Nucleus routine — system mask is off 
Invalid reentry flag 

Reserved for IBH use 
SVC abend code if any 
Current allocated save area 
Last allocated save area 
Nested SVC depth 



Address of EHSOVS 
"Before print" flags 
"Before type" flags 
"After print" flags 
"After type" flags 
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SVCSECT 



Bezadeciaal Field 
Displacement Naae 



Field Description, Contents, Heaning 



The Following Eguate S^Bbols Are Associated with the First Byte of the 
QllZP and OVAFP Flig Fields Def inid Above "" 

Current option is set on 
GPBs before call wanted 
GPBs after call wanted 
GPBs returned froi SVC callee 
PLISI wanted 

Floating-point registers wanted 
Floating-point registers returned froa SVC 
callee 



0VF10N 


EQD 


X«80« 


0VF1GB 


EQD 


X»40» 


OVFIGA 


EQD 


X'20' 


0VF1GS 


EQD 


XMO» 


0VF1PA 


EQD 


X»08» 


0VF1F 


EQD 


X'04» 


0VF1FS 


EQD 


X«01» 



The Following Eguate Sjmbols Are Associated with the Seccng jByte in the 
OJBTP and OVAFP Flag Fields 

STOP wanted 

CMS SVC TBACE wanted 

Horaal return CBS SVCs wanted 

OS SVCs wanted 

WAIT CHS SVCs wanted 

Current status of SVCTBACE 



Override options are on 
SVCTBACE SABE is valid 
After bit; set by DHSITS 
HALT override flag 
SDSPEHD override flag 

Beserved for IBH use 

INTSVC work area 

Nornal standard information 

Beserved for IBH use 
Current SVC count 
For EHSITS debugging 
Save B14 for DHSLAD 
Save Bia for DMSLADW 
Save B14 for DHSLFS 





0VF2ST 


EQD 


X»80« 




0VF2CH 


EQD 


X'40» 




0VF2Hfi 


EQD 


X«20' 




0VF20S 


EQD 


XMO' 




0VF2SA 


EQD 


X»08' 


2C 


OVSTAT 


DC 


B'O' A*2 




Bits def. 


ined 


in OVSTAT 




OVSOH 


'eqd 


X'80» 




OVSPBEV 


EQD 


X'40' 




OVSAFT 


EQD 


X»20' 




ovseo 


EQD 


XMO» 




ovsso 


EQD 


X»08» 


2D 




DC 


XL3»0' 


30 


SVCSAVE 


DC 


18F»0« 


78 


NBMSAV 


DC 


28D»0« 


158 




DC 


F»0» 


15C 


SVCODNT 


DC 


F«0« 


160 


SVC STOP 


DC 


F»0« 


164 


SVLAD 


DS 


F 


168 


SVLADH 


DS 


F 


16C 


SVLFS 


DS 


F 


1 170 


LOADLIST 


DC 


CL8»L0AD* 


1 178 


LOADNAHE 


DC 


CL8» » 


1 180 




DC 


CL8») » 


i 188 




DC 


CL8«0BIGIN« 


1 190 


LOADSTBT 


DC 


CL8»0» 


1 198 




DC 


8X«FF' 


1 1A0 




DC 


2F'0' 




PLIST for Calling DHSLDB (Ke 


1A8 




DS 


OF 


1A8 


HODLIST 


DC 


CL8»L0ADH0D ' 


1B0 


DOHCOM 


DC 


CL8» » 


1B8 


SSHON 


DC 


X»FF« A*3 


1B9 


ZER03 


DC 


AL3(0) 


1BC 


TRAHSRT 


DC 


CL8' » 



Beserved for IBH use 



Boutine name 

Hodule filename filled in here 

Fence; allows all interrupts 

Address is 3-b7tes long and set to zeros 

Holds filename of transient routine 
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SVCSECT 



Hexadecinal 


Field 










Displacenent 


Naie 








Field Description, Contents, Meaning 


ICH 


TRAHMSK 


DC 


AL1(X' 


'FF») A*4 




1C5 


ADTRANS 


DC 


VL3(TRASSAR) 




1C8 


TEHP02 


DC 


D«0» 




For CVD and other scratch use 


1D0 




DC 


4F«0« 




Reserved for IBM use 


1E0 




DS 


OD 






1E0 


R6PRS 


DS 


OF 




Returned general-purpose registers 


1E0 


RGPRO 


DS 


F 




RO 


1E4 


R6PR1 


DS 


F 




R1 


1E8 


RGPR2 


DS 


F 




H2 


1EC 


RGPR3 


DS 


F 




H3 


IFO 


R6PR4 


DS 


F 




R4 


1FU 


RGPF5 


DS 


F 




H5 


1F8 


R6PR6 


DS 


F 




R6 


1FC 


HGPR7 


DS 


F 




R7 


200 


RGPR8 


DS 


F 




R8 


204 


RGPR9 


DS 


F 




R9 


208 


RGPR10 


DS 


F 




R10 


20C 


RGPR11 


DS 


F 




R11 


210 


RGPR12 


DS 


F 




R12 


214 


RGPR13 


DS 


F 




R13 


218 


RGPR14 


DS 


F 




R14 


21C 


RGPR15 


DS 


F 




R15 


220 


RFPRS 


DS 


OD 




Returned floating-point registers 


220 


RFPRO 


DS 


D 




FPRO 


228 


RFPR2 


DS 


D 




FPR2 


230 


RFPR4 


DS 


D 




FPH4 


238 


RFPR6 


DS 


D 




FPR6 


240 


HRMDSA? 


DS 


12D 




NRMSiV user save area 
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SVEARA 



SVEARA: LTA AND PP SAVE AREA DSECT 



SVEARA describes the fields in a DOS/VS Logical Transient Area (LTA) and Problem Program 
(PP) save area. SVEARA is invoked via the DOSAVE macro. These areas are used by DOS/VS 
routines to save the value of the PSW and registers for purposes such as linkage to and 
from transient routines. 




8 
10 
18 
20 
28 
30 
38 
40 
H8 



1 /////////////////////////// 1 /////////////////////////// 1 


1 SVEPSH 1 SVEPSW2 | 


1 SVER09 1 SVIROA | 


1 SVEROB 1 SVEROC | 


1 SVEROD 1 SVEROE | 


1 SVEROE 1 SVEROO | 


1 SVER01 1 SVER02 | 


1 SVER03 1 SVER04 | 


1 SVER05 1 SVIR06 1 


1 SVER07 1 SVER08 | 

t _ _ _ _ 1 



Hexadecimal Field 
Displacement Name 








DS 


2F 


8 


SVEPSW 


DS 


F 


C 


SVEPSW2 


DS 


F 


10 


SVER09 


DS 


F 


1U 


SVEROA 


DS 


F 


18 


SVEROB 


DS 


F 


1C 


SVEROC 


DS 


F 


20 


SVEROD 


DS 


F 


24 


SVEROE 


DS 


F 


28 


SVEROF 


DS 


F 


2C 


SVEROO 


DS 


F 


30 


SVER01 


DS 


F 


34 


SVER02 


DS 


F 


38 


SVER03 


DS 


F 


3C 


SVER04 


DS 


F 


40 


SVER05 


DS 


F 


44 


SVER06 


DS 


F 


48 


SVER07 


DS 


F 


4C 


SVER08 


DS 


F 



Field Description, Contents, Meaning 

Reserved for IBH use 
First half PSW 
Second half PSW 
Save area for register 9 
Save area for register 10 
Save area for register 11 
Save area for register 12 
Save area for register 13 
Save area for register 14 
Save area for register 15 
Save area for register 
Save area for register 1 
Save area for register 2 
Save area for register 3 
Save area for register 4 
Save area for register 5 
Save area for register 6 
Save area for register 7 
Save area for register 8 
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SYSCOH 

SYSCOM; SYSTEM COMMUNICATION REGION 

SYSCOM descrites the fields in the SYSCOM block which is the CMS/DOS equivalent of the 
DOS/VS System Communication Region (SYSCOM) . The fiSYSCOM field in NDCCN points tc the 
SYSCOM block in DMSNOC. 



10 
18 
20 
28 
30 
38 
40 
48 
50 
58 
60 
68 
70 
78 
80 
88 
90 
98 
AO 
A8 
BO 
B8 
CO 
C8 



f ,,,.., ^ 

1 IJBERBLC 1 IJEAHEX | 


1 IJBERR19 1 IJBERR24 | IJEPDBRS | 


1 IJBFETCH 1 IJEIHTRT j 


1 IJBEXTRT 1 IJELTA | 


1 IJBPPBEG I IJECEANQ ! 


1 IJBQSIZE ! IJBQLNG | IJEHPART 1 ///////////// 1 


1 IJBRSAVE 1 IJECCNSP | 


1 IJBSAB 1 IJECENTB | 


1 A*1 1 A*2 1 A*3 1 A*4 | IJESTID | IJBEXIT | 


1 IJBPDADR 1 IJETKHLD | 


1 IJBTIMER 1 IJEAETAB | 


1 IJBLIK 1 IJBTIK 1 IJEPFR | 


1 IJBTCAVT 1 IJERITAB | 


1 IJBEDECB 1 IJEOLTEP | 


1 IJBRASLN 1 IJETRTAB | 


1 IJBPBOHN 1 IJEJATAB | 


1 IJBPMGR ! IJECCWT | 


1 IJBSAVSD 1 IJELHSTB I 


1 IJBAMCOM 1 IJEAPTA | 


1 IJBSBLKO 1 IJESBLKX | 


1 A*5 1 A*6 1 A*7 1 A*8 ( A*9 1 A* 10 1 ///////////// 1 


1 //////////////////////////// 1 /////////////////////////// 1 


1 //////////////////////////// 1 IJEMVCAD 1 


1 //////////////////////////// 1 ///////////// 1 ///////////// 1 


1 IJBMFCEE 1 


1 1 A*11 1 IJEPDBLN 1 IJBAPNO | 

I ,_-., _._. „ ,_. , _ 1 



Section 2. CHS lata Areas and Control Blocks 239 



SYSCOM 



D0| 
1 


IJBSEGT 


1 IJBPFT 


D8| 
1 


IJBPFTX 


1 IJBBOX 


E0| 
1 


IJBDPDTB 


1 /////////////////////////// 


E8| 
1 


IJBVIRAD 


1 IJBEOR 


F0| 
1 


IJBFTTAB 


1 IJBSVA 


F8| 
1 


IJBSVIS 


1 //////////ARP SL//////////// 


1001 
1 


/////////ARPSR////////////// 1 I JEDLAB 


1081 
1 




SYSSCODE 


1101 


1 
1 



Hexadecimal Field 
Eisplacement Naie 






IJBERBLC 


DC 


A(0) 




4 


IJBAREX 


DC 


A(0) 




8 


IJBERR19 


DC 


H»0« 




A 


IJBERR24 


DC 


H»0» 




C 


IJBPOBRS 


DC 


F«0« 




10 


IJBFETCH 


DC 


A(0) 




14 


IJBINTRT 


DC 


A(0) 




18 


IJBEXTRT 


DC 


A(0) 




1C 


IJBLTA 


DC 


A(0) 




20 


IJBPPBEG 


DC 


A(0) 






IJBFLPTR 


EQO 


* 




24 


IJBCHANQ 


DC 


F»0» 




28 


IJBQSIZE 


DC 


H'O* 




2A 


IJBQLNG 


DC 


H»0» 




2C 


IJBNPART 


DC 


H'1» 




2E 




DC 


H«0» 




30 


IJBRSA?E 


DC 


A(0) 




34 


IJBCONSP 


DC 


A(0) 




38 


IJBSAB 


DC 


A(0) 




3C 


IJBCHNTB 


DC 


A{0) 




40 


IJBFLG01 


DC 


x»oo» 


A*1 


41 


IJBFLG02 


DC 


X'OO* 


A*2 


42 


IJBFLG03 


DC 


x«oo» 


A*3 


43 


IJBFLG04 


DC 


x«oo« 


A*4 


44 


IJBSTID 


DC 


H»0» 






IJBSELCT 


EQO 


*-1 




46 


IJBEXIT 


DC 


H«0« 




48 


IJBPDADR 


DC 


A(0) 






IJBTHPTR 


EQD 


*-1 




4C 


IJBTKHLD 


DC 


F«0» 





Field Description, Contents, leaning 

Address of error block 

Exit address for attention 

Cancel exit for attention 

Cancel exit for attention 

SYSRES PDE address 

Address of fetch routine 

Address of I/O interrupt routine 

Address of external interrupt routine 

Pointer to logical transient area 

Pointer to problea program area 

Free list pointer 

Pointer to channel queue 

Number of channel queue entries 

Length of one error queue entry 

Number of partitions 

Reserved for IBH use 

Pointer to channel buckets 

Address of CRT table 

Address of SAB table 

Address of channel control table 

Flags and switches 

Switch byte 

Flags and switches 

Flags and switches 

System task selection control field 

System task selection byte 

Pointer to task selection 
Pointer to PDAREA 

Track hold ILPTR 

Address of track hold table 



240 IBM VM/370 Data Areas and Control Block Logic 



SYSCCH 



Hexadecimal 


Field 








Displacement 


Name 








50 


IJBTIBER 


DC 


A(0) 




54 


IJBABTAB 


DC 


A(0) 




58 


IJBLIK 


DC 


H«0» 




5A 


IJBTIK 


DC 


X'0010« 




5C 


IJBPWR 


DC 


A(0) 




60 


IJBTCAVT 


DC 


A(0) 




64 


IJBRFTAB 


DC 


A(0) 




68 


IJBEDECB 


DC 


A(0) 




6C 


IJBOLTEP 


DC 


A(0) 




70 


IJBRASLN 


DC 


A(0) 




74 


IJBTRTAB 


DC 


A(0) 




78 


IJBPBOHN 


DC 


A(0) 




7C 


IJBJATAB 


DC 


A(0) 




80 


IJBPMGR 


DC 


A(0) 




84 


IJBCCHT 


DC 


A(0) 




88 


IJBSAVSD 


DC 


A(0) 




8C 


IJBLNSTB 


DC 


A(0) 




90 


IJBAMCOM 


DC 


A(0) 




94 


IJBAPTA 


DC 


A(0) 




98 


IJBSBLKO 


DC 


A(0) 




9C 


IJBSBLKX 


DC 


F»0« 




AO 


IJBSYSPT 


DC 


X'OO" 


A*5 


A1 


IJBRASPT 


DC 


AL1(0) 


A*6 


A2 


IJBPMRPT 


DC 


AL1(0) 


A*7 


A3 


IJBSDPPT 


DC 


AL1(0) 


A*8 


A4 


IJBCRTPT 


DC 


AL1(0) 


A*9 


A5 


IJBERPPT 


DC 


AL1(0) 


A*10 


A6 




DC 


10X«00» 




BO 




DC 


F«0« 




B4 


IJBHfCAD 


DC 


A(0) 




B8 




DC 


F«0» 




BC 




DC 


H'O' 




BE 




DC 


H»0« 






X JBnFCEB 


DS 


11X»00» 




CB 


IJBNERQ 


DC 


AL1(0) 


A*11 


CC 


IJBPOBLH 


DC 


S(0) 




CE 


IJBAPHO 


DC 


HM» 




DO 


IJBSEGT 


DC 


A(0) 




D4 


IJBPFT 


DC 


A(0) 




D8 


IJBFFTX 


DC 


A(0) 




DC 


IJBBOX 


DC 


A(0) 




EO 


IJBDPDTB 


DC 


A(0) 




E4 




DC 


F«0« 




E8 


IJBYIRAD 


DC 


A(0) 




EC 


IJBEOR 


DC 


F'O' 




FO 


IJBFTTAB 


DC 


A(0) 




F4 


IJBSVA 


DC 


A(0) 




F8 


IJBSVIS 


DC 


A(0) 




FC 


ARPSL 


DC 


A(0) 




100 


ARPSR 


DC 


A(0) 




104 


IJBDLAB 


DC 


A(SYS$CODE) 


108 


SYSSCODE 


DC 


CL13»CMS/VSAH' 



Field Description, Contents, Beaning 

Address of timer request table 

Address of AB option tafcle 

Key of task owning the LTA 

Task interrupt key 

Pointer to power table 

Space for VTAH address 

Pointer to RF table 

Pointer to ID and ECB table 

Address of CLTEP bucket 

Pointer to RAS linkage area 

Address of ASCII table 

Address of PDB ownership table 

Address of job accounting commcn area 

Base address of programmer routines 

Address of CCW transient work area 

Pointer to SDAID common area 

Address of line mode table 

Address of VSAH common register 

Address of PTA 

Pointer to first system task block 

Pointer to current system task 

For alignment 

Pointer to RAS task block 

Pointer for PHGR task block 

Pointer to SP7R task block 

Pointer to CRT task block 

Pointer to ERP task block 

Reserved for IBM use 

Reserved for IBH use 

Pointer to KVCFLD 

Reserved for IBM use 

Reserved for IBM use 

Reserved for IBM use 

Information on MFCM and BFCD ERP 

Number of error queue entries 

Length of PDB table 

Number of active partitions 

Address of segment table 

Address of page frame table 

Pointer to page frame table extension 

Pointer to boundary box 

Pointer to EPD table 

Reserved for IBM use 

Address of 7IRTAD routine 

End of real storage 

Address of the fetch table 

Address of the SVA start 

Address of SVA GETVIS area 

Reserved for IBM use 

Reserved for IBM use 

Pointer to system code name 

System code name 
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SYSNAMES 



SYSNAMES: SAVED SYSTEMS NAMES 



SYSNAMES defines the names of any saved systems which may te loaded by CMS routines. 
SYSNAMES describes the entries in the SYSNAMES table which is pointed to by the ASYSNAMIS 
field in NUCON. 



10 



18 



CMSSEG 



CMSVSAM 



CMSAHS 



CMSDOS 



Hexadecimal Field 
Displacement Name 






CMSSEG 


DC 


CL8»CHSSEG» 


8 


CMSVSAM 


DC 


CL8»CMSVSAM» 


10 


CMSAMS 


DC 


CL8»CMSAMS» 


18 


CMSDOS 


DC 


CLS'CMSDOS* 


20 


SYSNEND 


DS 


OD 




SYSNCNT 


EQU 


(SYSNEND-SYS 



Field Description, Contents, Meaning 

CMS shared system name 

VSAM shared system name 

Access Method Services shared system name 

DOS shared system name 



{SYSNEND-SYSNAMES)/8 Size in doublewords {X»04») 
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TSOBLKS 



TSOBLKS; TSO CONTIQIi ILQCKS 

TSOBLKS DSECT describes the entries in the TSOBLKS block which contains OS control 
information used by CMS, that is, the coamand program parameters list (CPPL) , user 
profile table (DPT) , protected step control block (PSCB) , and the environment control 
table (ECT) . The ATSOCPPL field in NUCON points to TSOBLKS block. 



r 

1 CPPLOBDF 


1 


CPPLUPT 




1 CPPLPSCB 


1 


CPPLECT 




I/////////////I 


DPTDSEB 






I UPTUSER (cent.) 


1 A*1 1 


A*2 1 A*3 


1 ////// 




PSCEDSER 




1 A*a 


1 PSCBGPNM 


1//// A*5 ////I a*6 


1 
1 








8 
10 
18 
20 
28 
30 



48 
50 
58 
60 
68 

in 

I V 

78 
80 





r 
1 


PSCBTCOL 


1 PSCBRLGB 


1 


PSCBOPT 


1 PSCBOPTL I///////////I 


PSCBRSZ 


1 PSCBD 


1 A*7 1 ECTRTCD 


1 


ECTIOWA 


1 A*8 1 SCTSMSG 


1 


ECTPCMD 


1 ECTPCMD (cont.) 


1 


ECTSCMD 


1 ECTSCMD (cont.) 


1 A*9 1 


ECTDDBDM 






\/f/////////f/////f/f/f/fff/ • 

I 



Hexadecimal Field 
Displacement Name 






CPPL DS 


OF 





CPPLOBDF DC 


AL4(0) 


4 


CPPLDPT DC 


AL4(DPT) 


8 


CPPLPSCB DC 


ALU (PSCB) 


C 


CPPLECT DC 


AL4(ECT) 




Oser Profile 


Table (DPT) 


10 


DPT DS 


OF 


10 


DS 


CL2 


12 


OPTOSER DS 


CLIO 


1C 


DPTSHS DC 


X«00' 




Bits Defined 


in DPTSWS 



EQD X»80' 

DPTNPRM EQD X»UO» 

DPTMID EQD X»20' 

DPTNCOM EQD XM0» 



A*1 



Field Description, Contents, Meaning 

Temporary PLIST to CP programs 
Address of command line 
Address of dummy DPT 
Address of dummy PSCB 
Address of dummy ECT 



Reserved for IBM use 
Reserved for installation use 
Dser's environment switch 



Reserved for IBM use 

No prompting is to be done 

Print message identifiers 

No user communication allowed via SEND 
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TSOBLKS 



Hexadeciial Field 
Cisplaceient Naie 



Field Description, Contents, Deaning 



Pause for "?" when in noninterface lode 
ITTH has teen specified as line delete 

Character delete character 
Line delete character 
Reserved for IBH use 

(PSCE) 

User ID padded with hlanks 
Length of user ID 

Esoteric group na«e initialized by logon 
16-bit string of user attributes; bits 3-15 
reserved for IBH use 



Operator coioand user 
Account coaaand user 
Submit coanand user 

Reserved for IBH use 
A*6 16-bit string reserved for installation use 

Six fullwords used for TSC accounting; 
initialized to 



Pointer to the user profile table 
Length of the user profile table 
Reserved for IBH use 
Region size requested in 2K units 
Reserved for installation use 



High-order tit indicates CE abended 
Return code froa last control routine 
Address of I/O service routine work area 
High-order tit neans delete seccnd level 
■essages (Hust be initialized by user at 
start of user's prograi) 
Address of second level aessage chain 
Priaary conaand naae 
Subcoaaand naae 
ECT switch 

If tit is on, no operands exist in conmand 

buffer 
CP terminated by THP DETACH with STAE 
Reserved for IBH use 
Logon/off requested THP to log off 
No user messages received at logon 
Ho broadcast notices to be received 

Counter for generated teapcrary DDHAHS 
Reserved for installation use 
Reserved for IBH use 

I Ho te; For terminal attention exit eleaent (TAXE) , see the CHSTAXE DSECT. 





Bits Def; 


Lned 


in DPTSWS(cont.) 




OPTPADS 


"eqd 


X»08» 






OPTALD 


EQU 


X»04» 




1D 


OPTCDEL 


DC 


X«00» 


A*2 


IE 


OPTDEL 


DC 


X'OO' 


A*3 


IF 




DS 


CL1 






Protected Ste£ Control 


Block (: 


20 


PSCB 


DS 


OF 




20 


PSCBOSER 


DC 


CL7» ' 




27 


PSCBOSRL 


DC 


X«00« 


A*4 ; 


28 


PSCBGPNH 


DS 


CL8 




30 


PSCBATR1 


DS 
ORG 


X 
PSCBATR1 


A*5 




PSCBCTRL 


EQO 


X»80« 


1 




PSCBACCT 


EQD 


X»40« 






PSCBJCL 


EQU 
DS 


X»20' 
X 




32 


PSCBATR2 


DS 


X 


A*6 


33 




DS 


X 




34 




DC 


6F»0» 




4C 


PSCBTCOL 


DS 


IF 




50 


PSCBRLGB 


DS 


AL4(0) 




54 


PSCBDPT 


DC 


AL4(DPT) 




58 


PSCBDPTL 


DC 


AL2(16) 




5A 




DS 


BL.16 




5C 


PSCBRSZ 


DS 


A 




60 


PSCBD 


DS 


CL8 






Environaent C 
ECT DS 


:ontrol Table (ECT 


68 


OF 




68 


ECTRCDF 


DC 


AL1(0) 


A*7 


69 


ECTRTCD 


DC 


AL3(0) 




6C 


ECTIOSA 


DC 


AL4(0) 




70 


ECTHSGF 


DC 


X»00« 


A*8 


71 


ECTSHSG 


DS 


AL3 




74 


ECTPCHD 


DC 


CL8« • 




7C 


ECTSCHD 


DS 


CL8 




84 


ECTSHS 


DC 


X'OO' 


A*9 




Bits def: 


Lned 


in ECTSWS 






ECTNOPD 


'eqo 


X»80' 






ECTATRH 


EQD 


X«20» 


I 




* 


EQD 


X»40» 






ECTLOGF 


EQD 


XMO« 






ECTNHAL 


EQD 


X»08» 






ECTNNOT 


EQD 


X»04» 




85 


ECTDDNOH 


DC 


AL3(0) 


1 


88 


ECTDSER 


DS 


A 




8C 




DS 


A 
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nSlVE„DSERSlCT 

DSAVJl USER SAVE ARIl 

OSAVE is used by DMSITS to allocate and free save areas for other routines during S7C 
processing; it is pointed to by the DSAVEPTH field in SSA7E. USAVE is invoked via the 
SVCSAVE aacro. 



01 



581 I 

I 1 

Hexadecimal Field 

Displacement Naae Field Description, Contents, Meaning 



DS 12D Scratch area passed to user via a pointer in 

H13 

DSA?ESZ EQD (*-DSAVE)/8 Size of user save area in dcublewords (X«OC») 



USER SECT: OSER WORK AREA 

DSERSECT describes the DSERSECT block which is a general scratch storage area provided 
for user— defined purposes. It nay be redefined to suit installation requirements. 
DSERSECT is pointed to by the ADSER field in NDCCH. 

I 1 

I USCRTCH I 



ao I I 

I 1 

Hexadecimal Field 

Displacement Name Field Description, Contents, Heaning 



DSCRTCH DC 18F'0» User scratch area; may te redefined per 

installation requirements 
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Section 3. RSCS Data Areas and Control Blocks 



This section describes in detail each of the data areas used by RSCS. Dnlike the CP and 
CMS format tlccks in this publication, the RSCS format blocks are on fullword boundaries. 

This section of the publication contains only ESECTs. Appendixes E and C contain 
other control areas used by RSCS. 
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ASYNE 



a SINE: ASYHCHRONODS EXIT ELEMENT 

ASYNE defines syibolic addresses for elenents on an asynchronous exit queue. An 
asynchronous exit queue element contains information ty which a task requests that it 
handle asynchronous interrupts. 

lOEXITQ, EXTQ, and ALERTQ in SVECTORS are the heads of three asynchronous exit queues. 
Each of these queues is comprised of supervisor elements defined by the ASYNE DSECT. 
lOEXITQ points to requests for I/O exits, EXTC points to requests for external exit 
requests, and ALERTQ points to requests for ALERT exits. 



r 




ASYNNEXT 




1 
1 


1 ASYNTASK | 


1 ASYNEXIT 1 


1. 


ASYHCODE 


I//ASYHSPAR///I 


ASYNID 


1 

1 

J 



Hexadecimal Field 
Displacement Name 






ASYNNEXT 


DS 


1F 


n 


ASYNTASK 


DS 


IF 


8 


ASYNEXIT 


DS 


IF 


C 


ASYNCODE 


DS 


AL2 


E 


ASYNSPAR 


DS 


IX 


F 


ASYNID 


DS 


IX 



Field Description, Contents, Heaning 

Address of the next asynchronous 

interrupt exit request element 
Address of task element describing 

the task that requested the 

asynchroiious interrupt 
Address of the requested asynchronous exit 

routine 
Address of the device for which 

asynchronous I/O interrupts are 

requested or interrupt bit code 
Reserved for IBH use 
1-byte identification of the task owning the 

asynchronous exit routine 
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BOFDSECT: SML TELECOMMUNICATIONS BUFFER 



EUFESECT 



EUFDSECT is used to transmit buffer control information 
programoable remote stations. 



and tuffer data to and from 



The buffer sent across the TP line starts at EUFSTART; the first 
are used by the DHTSML line driver but are not transmitted. 



7 bytes of EUFESECT 



$BUFPOOL in DMTSML points to a queue of available TF buffers; SINEDF in module DBTSKL 

points to a queue of TP buffers that have been received from a remote station and are 

waiting to be deblocked. $OUTBUF in DMTSML points to a queue of TP buffers that are 
ready for transmission to remote stations. 



r- 






BOPCHAIN 






BUFCOUNT 




1 EUFSTAT 1 


BUFSTART 




BUFSTART | 


BUFECB 


1 BUFFCS 










BUFDATA 





Hexadecimal Field 
Eisplacement Name 



BUFBEGIH DS OF 

BUFCHAIN DC A (0) 

■ort'onnnia'r* nc in 

XJ \J ^ \^\J K/ a ^ XJ*J a&x 

BUFSTAT DS 1C 



Field Description, Contents, Meaning 

Beginning of the buffer 
Buffer chain field 
Count of b^tes to transmit 
Buffer status byte 



Siis defined in BUFSTAT 
BUFFAKE EQU X»01» 
BUFRESP EQU X«02» 



^SAK 



■prvn V t nil t 

£lVU AWT 



BUFTEXT EQU X»08« 
BUFUCHEK EQU XMO« 

BUFSTART DS CL2 

BUFBCB DS 1C 

BUFFCS DS CL2 

BUFDATA DS OF 



Dummy buffer indicator 
Response only in buffer 
NAK response being sent 
Buffer contains text information 
Unit check expected 

Bisynchronous transmission control bytes 
Block control byte 
Function control sequence 
Data portion of TP buffer 
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COMDSECT 



COMDSECT: ADDRESS CONSTANTS AS POINTERS 

COMDSECT defines address constants used as pointers to subroutines coimon to all HSCS 
modules. These subroutines are contained in module DMTCOH. COHDSECT is pointed to by 
TCOM in SVECTORS. 



10 



14 



GLINKREQ 



GPAGEEEQ 



FPAGEREQ 



PHSGHEQ 



GMSGHEQ 



GTODEBCD 



Hexadecimal Field 

Displacement Name 

GLINKREQ DS 1A 

4 GPAGEREQ DS 1A 

8 FPAGEREQ DS 1A 

C PMSGREQ DS 1A 

10 GMSGREQ DS 1A 

ia GTODEBCD DS 1A 



Field Description, Contents, Meaning 

Get link table entry routine 

Get page of main storage 

Free page of main storage 

Put message element into message stack 

Remove message element from message stack 

Convert S/370 TOD to EBCDIC 
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DEVTAELE 



DEVTABLE: NPT DEVICE TABLE 



EEVTABLE defines virtual device information for an I/C operation 
to the lOTAELE DSECT. 



This DSECT corresponds 



I 



DEVLOCK 



DEVADDR 



DEVSNBEQ 



1 DE7TYPE 



8 I 



DEVSTART 



C I 



DEVCSW 



14 
18 
1C 



DEVSENSE I 



EEVFLAGS 



DEVNAME 



Hexadecimal Field 
Displacement Name 



C 

C 

14 

15 



DEVLOCK DC 

DEVADDR DC 

DEVSNREQ DC 

DEVTYPE DC 

DEVS'''*RT DC 

DEVSIOCC DC 
DEVCSW DC 
DEVSENSE DC 
DEVFLAGS DC 
DEVSAKE DC CL8 



F'O' 


AL2(0) 


AL1(0) 


X»00» 


F'O' 


OX'OO' 


2F«0« 


X»00» 


3X»00' 


CT.Q' « 



Field Description, Contents, fieaning 

I/O request synch lock 
CDD address of I/O device 
Requested sense bytes 
VM/370 device type code 
Address start channel program 

for I/O handling 
Right-justified SIC condition code 
Ending CSH from last I/O operation 
Sense information on unit check 
Device status flags 
EBCDIC device address and name 
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FREEE 

IBJEE: A FREE ELEMENT ON THE SUPERVISOR ELEMENT QDEDE 

FREEE defines an eleaent in the chain of elements that comprise the free element queue. 

FREEQ in S7ECT0RS points to the chain of free elements, each of which is defined by 
the FREEE DSECT. 



FREENEXT 



FREESPAR 



I FREEID 



Hexadecimal Field 
Eisplacement Name 



FREENEXT DS 1F 
FREESPAR DS CL11 
FREEID DS 1X 



Field Description, Contents, Meaning 

Address of next element in free queue 
spare field 

Standard taskid displacement, which is; 
ID=X«00'=> free element 
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GI7E/TAKE 



GIVE RE^OEST TABLE 



The format of a GIVE Request Table is; 



Synch Lock 



Task name or A (GIVE Element) 



A (GIVE Request Buffer) 



A (GIVE Response Buffer) 



Hhen a task requests the services of another task via a GIVE request, the second field of 
the table above contains the task name of the task to which the task is to be sent. When 
EHTGIV builds a GIVE element for the request, it overlays this task name with the address 
of the GIVE element. 

The task performing the requested service builds a table called the TAKE request 
table, which corresponds to the GIVE request table. 



GIVEE: A GIVE ELEMENT 

GIVEE defines symbolic addresses for items used in processing a GIVE request. 

GIVEQ in SVECTORS points to the queue of GIVE elements used in task-to-task 
ccmsuuXcatxCuS. 

The GIVEADDR field of this DSECT is the address of a GIVE request table, which, in 

turn, contains addresses of buffers for elements describing requests and responses to 

requests. These tables are described below; the elements that fill the buffers are 
described in "Appendix C: RSCS Request Elements." 






GIVENEXT 




1 

1 


4 


GIVEADDR 1 
I 1 


8 


GIVENAHE 1 
1 1 


C 


I/////////GIVESPAR/////////I GIVEBID 

L ._. _ .. - , . . 


1 GIVERID 


1 



Hexadecimal Field 
Displacement Name 






GIVENEXT 


DS 


IF 


a 


GIVEADDR 


DS 


1F 


8 


GIVENAME 


DS 


CLU 


c 


GIVESPAR 


DS 


AL2 


E 


GIVENID 


DS 


IX 


F 


GIVERID 


DS 


IX 



Field Description, Contents, Heaning 

Address of next GIVE element 

Address of GIVE request table in sending 

task's storage 
Task name of receiving task 
Reserved for IBH use 
1-byte identification of receiving task after 

the TAKE request has been processed 
1-byte identification of sending task 
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lOE 

IQE: AN 110 ELEMENT 

lOE defines symbolic addresses of elements and ether information associated with an I/O 
operation requested by a task. 

MPXIOQ and SELIOQ in SVECTORS point to queues of I/C elements for the multiplexer and 
selector channels, respectively. 

The lOTABLEA field points to the address of an I/O table defined by ICTAELE, which is 
described in this section. 



r 




lONEXT 




-\ 

1 


1 ■ ' ' ' 1 

1 lOSUBC 1 




lOSTAT 1 


lOTAELEA 




I 

1 
1 


1 


lOADDR 


1 lOSECHAN 1 


lOID 


1 

1 
1 



Hexadecimal Field 
Displacement Name 






lONEXT 


DS IF 


4 


lOSDBQ 


DS IF 


8 


10 STAT 


EQD * 




Bits def J 


S§^ is IQSTAT 



CHANDONE EQU X«aO« 

lOTABLEA DS IF 
lOADDR DS AL2 



lOSBCHAN 
lOID 



DS 
DS 



IX 
1X 



Field Description, Contents, Heaning 

Address of next active I/C element 
Address of first inactive I/C element for a 
given subchannel 

Status flags for current I/C operation 
(first tyte of lOTABLEA) 



Flag set to 1 while automatic sense is 

active 
Flag set to 1 when subchannel terminates 

Address of I/O request table in task storage 
Address (cuu) of the device requesting 

current I/O operation 
Subchannel address; 1-byte; assigned by HSDE 
ID of task associated with this I/O operation 

is 1-byte and assigned by BSDE 
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ICTAELE 



IOTA EL E: AN 1^0 TABLE 

lOTABLE defines symbolic addresses for items used in processing an I/C interrupt request. 
The first five fields are filled in by the task to convey information about the I/C 
request to the supervisor. The last three fields are filled in ty the supervisor to 
convey status information about the I/O operation to the task. 



10 



14 







lOSYNCH 






DEVCOD 


1 SEHSREQ 


DE7C0DE 


1 PBOGADDB 




SxOCODE i 


EbBCSB 














ESDSENSE 





Hexadecimal Field 
Displacement Name 






lOSYNCH 


DS 


1F 


4 


DEVCDO 


DS 


AL2 


6 


SENSREQ 


DS 


AL1 


7 


DEYCODE 


DS 


AL1 


8 


PROGADDR 


DS 


IF 




Bits def . 


Lned 


is M 



Field Description, Contents, Beaning 

Synchronization lock for I/C operation 
Address (cuu) of device associated 

with this I/O operation 
Number of sense bytes requested on unit check 
1-byte VH/370 device type code 

(not used by I/O manager) 
Address of channel program for the 

I/C operation 



1-byte SIO condition code 
return information 



D 
14 



SIOCODE 
ENDCSW DS 

ENDSENSE DS 



2F 
ALI 



SIO condition code 

Ending CSW with composite status 

return information 
Requested return sense information 

on unit check CSi status 



Bits defined in ENDSENSE 
TYPPDN EQO X'80» 
TYPPRT EQD X»40« 



VM/370 type code for the punch 
VM/370 type code for the printer 
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LIHKTABL 



IjIMTABL: link TABLE 

LINKTABL describes the status of a single link in the BSCS network; collectively, all the 
links defined for the system are referred to as the link tatle. 

An 8-byte header precedes the first entry in the link table (that is, the first link 
defined by the LINKTABL DSECT) - The TLINKS field in SVECTOBS points to this header, 
which has the following fornat: 

4 6 



total links 



I nazincii 
links 



current 
links 



wh ere ; 
total links 



is the total nuiber of links defined for an RSCS installation via the 
GEHLINK lacro during system generation. (For information en the GENLIHK 
macro, see the YM^370 System P ro grammer's Guide.) 



maximum links is the maximum number of concurrently active links allowable, 
current links is the number of links active in BSCS at a given time. 




4 
8 
C 
10 
14 
18 
1C 
20 
24 
28 
2C 
30 
34 
38 
3C 
40 
44 
48 
4C 



LINKID 



LDEFTNME 



LACffiiHE 



LDEFDRVB 



LACTDBVR 



LDEFLINE | 




LACTLINE 


LDBVRVAB 


LDEFCLS1 1 LDEFCLS2 | 


LDEFCLS3 | LDEFCLS4 


LACTCLS1 1 LACTCLS2 | 


LACTCLS3 1 LACTCLS4 


LTIMEZON 1 LFLAG | 




LBESEBVD 


LPENDING 1 




LTAKEK 


LPOINTEE 


LHSGQ 


LTBNSCNT | 




LEBBCHT 


LTOCNT 1 




LSPABE 



LNKCLOCK 
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LISKTAEL 



Eexadecinal 


Field 






Displaceaent 


Nase 









LIHKID 


DS 


CL8 


8 


LDEFTNME 


DS 


CL4 


C 


LACTTNME 


DS 


CL4 


10 


LDEFDRfR 


DS 


CL8 


18 


LACTDRTR 


DS 


CL8 


20 


LDEFLINE 


DS 


2X 


22 


LACTLISE 


DS 


2X 


24 


LDRVR7AR 


DS 


IF 


28 


LDEFCLS1 


DS 


CL1 


29 


LDEFCLS2 


DS 


CL1 


2A 


LDEFCLS3 


DS 


CL1 


2B 


LDEFCLS4 


DS 


CL1 


2C 


LACTCLS1 


DS 


CL1 


2D 


LACTCLS2 


DS 


CL1 




LACTCLS3 


DS 


CL1 


2F 


LACTCLS4 


DS 


CL1 


30 


LTIHEZOH 


DS 


IX 


31 


LFLAG 


DS 


IX 




Bits defined 
LACTIVE EQD 


in LFLAG 
X'80» 




LALERT 


EQD 


X'40» 




LHOLD 


EQD 


X»20« 




LDRAIH 


EQD 


XM0» 




LTRALL 


EQU 


X»08» 




LTRERR 


EQD 


X'04» 




LHALT 


EQU 


X»01« 




LINKLEH 


EQD 


♦-LINKTABL 


32 


LRESER7D 


DS 


1H 


34 


LPENDING 


DS 


1H 


36 


LTAKEN 


DS 


1H 


38 


LPOINTER 


DS 


IF 


3C 


LMSGQ 


DS 


IF 


40 


LTRNSCNT 


DS 


1H 


42 


LERRCNT 


DS 


1H 


44 


LTOCNT 


DS 


1H 


46 


LSPARE 


DS 


1H 


48 


LNKCLOCK 


DS 


8X 



Field Description, Contents, Heaning 

EBCDIC link identification 

Default task naie 

Active task name 

Default driver identification 

Active driver identification 

Default virtual line address 

Active virtual line address 

Line driver variable inforiation 

Default spool file Class 1 

Default spool file Class 2 

Default spool file Class 3 

Default spool file Class 4 

Active spool file Class 1 

Active spool file Class 2 

Active spool file Class 3 

Active spool file Class 4 

Displacement of two complete time zones from 

Greenwich Mean Time 
Link flag byte 



Link active 

AXS ALERT exit set 

Link hold set 

Link drain in progress 

Link transaction tracing (all) 

Link transaction tracing (error) 

Link to be forced inactive 

Length of link table entry 

Count of tag elements reserved 

Count of unaccepted tags 

Count of tag slots in use 

Address of start of the TAG gueue for this 

RSCS link 
HSG gueue pointer 
Link transaction count 
Error count 
Timeout count 
Spare halfwcrd 
Clock comparator value for this link 
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REQBLOCK 

lI^iOCK: NPT REQUEST BLOCK 

REQBLOCK defines data and information for a request for file processing by the DMTBET 
line driver. 

The first four fields of this DSECT form a GIVE request tatle, which is described in 
"GIYEE: A GIVE Element", in this section. 

The next seven fields of this DSECT for a GIVE request buffer in the format of a File 
Request Element, which is described in "Appendix C: RSCS Request Elements." 



10 

14 

18 

1C 
20 

24 

28 

2C 



RDEVSYNC 



RDEVREQN 



RDEVREQ 



RDEVRESP 



RDEVRLEN | RDEVFDN I///HDEVRESV///I HDEVSOPT 



RDEVTAG 



RDEVFIOA 



RDEVLINK 



RDEVNAHE 



RDEVSTYL 



RDEVFLAGS 



Hexadecimal Field 
Eisplacement Name 



Field Description, Contents, Meaning 



Hexadecimal Locations through F Com£rise the NPT GIVE Bec[uest Ta ble 
RDEVSYNC ~DC F»0» ~ Synchronous lock 

RDEVREQN DC CL4»AXS' File access task 
RDEVREQ DC A (0) Request buffer address 

RDEVRESP DC ALI (0) , AL3 (0) Response buffer address 

H^iad^cimal Locations through JF Comprise the NPT GIVE Request Buffer 
i5 the Format of a File Reguest Element (as shown in Appendix C) 

Request length 

Request function 

Reserved for IBM use 

Subordinate option byte 

Tag address 

File I/O area address 

Link name 

Device name 

Device style 

Device flags 



10 


RDEVRLEN 


DC 


AL1(0) 


11 


RDEVFDN 


DC 


AL1(0) 


12 


RDEVRESV 


DC 


AL1(0) 


13 


RDEVSOPT 


DC 


AL1(0) 


14 


RDEVTAG 


DC 


A(0) 


18 


RDEVFIOA 


DC 


A(0) 


1C 


RDEVLINK 


DC 


CL8» » 


24 


RDEVNAHE 


DC 


C» • 


27 


RDEVSTYL 


DC 


C » 


2C 


RDEVFLAGS 


DC 


ALI (0,0,0,0) 
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ROUTE: ROOTING TABLE ENTRY 



ROUTE 



I 
I- 
8 S 



ROUTDEST 



ROUTNEXT 



Hexadeciial Field 
Cisplacement Naie 



ROUTDEST DS 
ROUTNEXT DS 



CL8 
CIS 



ROUTSIZE EQU *-ROUTDEST 



Field Description, Contents, Meaning 

Final destination ID 
LINKID for indirect routing 

Length of a routing table entry 
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SVECTORS 



SVECTORS: LOH STORAGE DEFIHITIOHS 



SVECTORS defines low storage for the RSCS virtual Machine. It includes two types of 
storage: machine-defined and RSCS-defined. 



• MACHINE-DEFINED LOW STORAGE 

The SVECTORS lachine-def ined low storage defines nachine status data referenced during 
prograiB execution and required by System/370 architecture. 




4 

8 

C 

10 
14 

18 
1C 

20 
24 

28 
2C 

30 
34 

38 
3C 



IPLPSW 



IPLCCW1 



IPLCCH2 



OLDEXT 



OLDSVC 



OLDPROG 



OLDBACH 



OLDIO 



40 
44 

48 

4C 

50 

54 

58 
5C 

6C 
6C 

7C 

74 

78 
7C 



CSB 



CAV 



///////////////////////////////////// 



TIBER 



///////////////////////////////////// 



NEHEXT 



NEWSVC 



NESBACH 



NEWIO 



Hexadecimal Field 
Displacement Name 



Field Description, Contents, Heaning 




8 
10 
18 
20 
28 
30 
38 
40 
48 
4C 
50 
54 
58 
60 
68 
70 
78 



IPLPSW DS 
IPLCCW1 DS 
IPLCCW2 DS 
OLDEXT 
OLDSVC 
OLDPROG DS 
OLDBACH DS 
OLDIO DS 
CSW 



DS 
DS 



CAW 



TIBER 



DS 
DS 
DS 
DS 
DS 
DS 
DS 



NEWEXT 
NEWSVC 
NEWPROG DS 
NEWBACH DS 
NEWIO DS 



X • 00040000 »,V(DBIINI) 



4X« FF» 

X»00040000 
X'00040000 
X'00040000 
X'00020000 
X«00040000 



External interrupt old PSW 
Supervisor call old PSW 
Program check old PSW 
Bachine cheek old PSW 
Input/output old PSW 
Channel status word 
Channel address word 
Reserved for IBB use 
TOD clock 
Reserved for IBB use 

»,V(EB'IEXT) 

•,V(DBTSVC) 

•,A(REXODCH) 

»,A(OLEBACH) 

«,V(DB1I0BIN) 
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SVECTOBS 

• RSCS-DEFINED LOi STORAGE 

RSCS-defined low storage begins at hexadecimal location 200 and is defined specifically 
for the RSCS virtual machine. It contains pointers to modules that comprise the 
supervisor, supervisor control queues, and queues of requests for supervisor services. 



200 
204 

208 
20C 

210 

21a 

218 

21C 

220 

224 

228 

22C 

230 

234 

238 

23C 

240 

244 



NEVPSV 



SSAYE 



ACTIVE 



HAIHHAP 



HAINSIZE 



QDEDE 



QDEDEND 



FREEQ 



TASKQ 



MPXIOQ 



SELIOQ 



lOEXITQ 



EXTQ 



ALERTQ 



GI7EQ 



QREQ 



248 


r"- — ' 

DISPATCH 


1 
■ 


24C 


WAITREQ 1 


250 


POSTRIC 1 


254 


lOREQ 1 


256 


TASKREQ i 


25C 


HAIHREC 1 


26C 


ASYBREC 1 


264 


ALERTBEC | 


268 


GIVEREC 1 


26C 


TAKEREC 1 


270 


TVECTCRO 1 


274 


TVECTCR1 1 


278 


TVECTCH2 1 


27C 


TVECTCR3 1 


280 


TVECTCfl4 1 


28tl 


T¥ECTCR5 I 


288 


TVECTCR6 1 

1 


28C 


TVECTCR7 

L - .1 , 


i 

- J 



Hexadecimal Field 
risplacement Hame 



200 
208 
210 

214 

218 



Field Description, Contents, Meaning 

ORG SVECTORS*X»200* Leave room for machine extensions 

Dispatched ESH for last dispatcher 
General-purpose low storage save area 
Identifier of currently active task 
Address of task element for last dispatchee 
Address of start of main storage allocation 

map 
Total numher of pages in main storage 



NEHPSW 


DS 


D D«0' 


SSA¥E 


DS 


2F 2F«0» 


ACTIVE 


DS 


X X»00« 




DS 


AI3 AL3(0) 


MAINHAP 


DS 


V(DHTHAPHS) 


HAINSIZE 


DS 


F r«o« 
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SVECTORS 








Hexadeciinal 


Field 






Eisplacement 


Nane 






21C 


QDEOE 


DS 


V(SQDEDE) 


220 


QUEDEND 


DS 


V(SQOEOEND) 


224 


FREEQ 


DS 


A(0) 


228 


TASKQ 


DS 


A(0) 


22C 


MPXIOQ 


DS 


A(0) 


230 


SELIOQ 


DS 


A(0) 


234 


lOEXITQ 


DS 


A(0) 


238 


EXTQ 


DS 


A(0) 


23C 


ALERTQ 


DS 


A(0) 


240 


GIVEQ 


DS 


A(0) 


244 


QREQ 


DS 


V(DMTQRQ) 


248 


DISPATCH 


DS 


V(DHTDSP) 


24C 


WAITREQ 


DS 


V(DHTWAT) 


250 


POSTREQ 


DS 


V(DMTPST) 


254 


lOREQ 


DS 


V(DMTIOHHQ) 


258 


TASKREQ 


DS 


V(DMTASK) 


25C 


HAINREQ 


DS 


V(DMTSTO) 


260 


SYNREQ 


DS 


V(DMTASY) 


264 


ALERTREQ 


DS 


A(DMTSIG) 


268 


GIVEREQ 


DS 


V(DHTGIV) 


26C 


TAKEREQ 


DS 


VCDMTAKE) 


270 


TVECTORO 


DS 


A(0) 


274 


T¥ECT0R1 


DS 


A(0) 


278 


TVECT0R2 


DS 


A(0) 


27C 


TVECT0H3 


DS 


A(0) 


280 


TVECT0H4 


DS 


A(0) 


284 


TVECT0R5 


DS 


A(0) 


288 


TVECT0R6 


DS 


A(0) 


28C 


TVEGT0R7 


DS 


A(0) 




TLINKS 


EQU 


TVECTORO 




TROOTE 


EQO 


TVECTORI 




TPORTS 


EQO 


TVECT0R2 




TTAGQ 


EQD 


TVECT0R3 




TCOH 


EQD 


TVECT0R4 



Field Description, Contents, Heaning 

Address of start of supervisor queue 

Address of end of last supervisor queue 

elenent 
Address of start of free eleient queue 
Address of start of task element queue 
Address of start of multiplexer I/O queue 
Address of start of selector I/O queue 
Address of start of asynchronous I/O request 

element queue 
Address of start of external request element 

queue 
Address of start of task asynchronous request 

element queue 
Address of start of GIVE request element 

queue 
Supervisor queue allocation request entry 

address 
Task dispatcher entry address 
Wait request entry address 
Post request entry address 
I/O request entry address 
Task management request entry address 
Hain allocation request entry address 
Asynchronous interrupt request entry address 
Task asynchronous signal request) 

A (ALERT) entry address 
Task request GIVE request entry address 
Task request TAKE request entry address 



Task 
Task 
Task 
Task 
Task 
Task 
Task 
Task 



defined 
defined 
defined 
defined 
defined 
defined 
defined 
defined 



field 
field 
field 
field 
field 
field 
field 
field 



Link table address 
Reserved for IBH use 
Switchable port table address 
Tag slot queue 
Common routine chain 
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TAG 

TAG: RSCS FILE DESCRIPTOR 

TAG describes a file enqueued fcr processing by RSCS. The data in this area is built 
from the TAG record associated with a file via the CP tag command and from the CP spool 
file block (SFB) that describes the file. 





8 
C 
10 
14 
18 
1C 
20 
24 
28 
2C 
30 
34 
38 
3C 
40 
44 
48 
4C 
50 
54 
58 
5C 
60 
64 
68 



1 


1 
TAGHEXT 1 


1 TAGELOCK | 


1 TAGISLOC 1 


1 TAGLINK 1 


1 TAGIHTOD 1 


1 TAGIHVM 1 


1 TAGRECNM | 


1 TAGRECLN 


1 TAGISEEV 1 TAGCLASS i 


1 TAGID 


1 TAGCOPY 1 


1 TAGFLAG | 


TAGFLAG2 | /////////RESERVED//////////// ! 


1 TAGNAME | 


1 TAGTYPE 1 


1 TAGDIST 1 


1 TAGTOLOC 1 


1 TAGTOVH 1 
1 1 


1 TAGPRIOR 


■■■■■'■- ■- - 1 
1 TA6DEV 1 
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Hexadecimal Field 
Displacement Name 






TAGNEXT 


DS 


IF 


a 


TAGBLOCK 


DS 


IF 


8 


TAGINLOC 


DS 


CL8 


10 


TAGLINK 


DS 


CL8 


18 


TAGINTOD 


DS 


CL8 


20 


TAGINYM 


DS 


CL8 


28 


TAGRECNK 


DS 


IF 


2C 


TAGRECLN 


DS 


1H 


2E 


TAGINDEV 


DS 


IX 


2F 


TAGCLASS 


DS 


CL1 


30 


TAGID 


DS 


1H 


32 


TAGCOPY 


DS 


1H 


34 


TAGFLAG 


DS 


IX 


35 


TAGFLAG2 


DS 


IX 


36 




DS 


1H 


38 


TAGNAHE 


DS 


CL12 


HH 


TAGTYPE 


DS 


CL12 


50 


TAGDIST 


DS 


CL8 


58 


TAGTOLOC 


DS 


CL8 


60 


TAGT07M 


DS 


CL8 


68 


TAGPRIOR 


DS 


CL2 


6A 


TAGDEV 


DS 


2X 



Field Description, Contents, Meaning 

Address of next active queue entry 

Address of associated I/C area 

Originating location 

Next location for transmission 

Time of file origin 

Originating virtual machine 

Number of records in file 

Haximum file data record length 

Device code of originating device 

File output class 

File number at origin location 

Number of copies required 

VM/370 SFELCK control flags (SFBFLAG) 

VM/370 SFELCK control flags (SFEFLAG) 

Reserved for IBM use 

Filename 

Filetype 

File distribution code 

Destination location ID 

Destination virtual machine ID 

Transmission priority 

Active file's virtual device address 



TAGLEN EQD *-TAGNEXT 



Length (in bytes) of the file TAG (X'OD') 
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TAGAE14 



TAGAREA 

TAGAREA in DMTAXS module contains tag queue pointers and other tag control information. 
It is pointed to by TTAGQ in SVECTORS. 



r ■- 




TAGAFREE 




1 


1 TAGACIN 1 


1 TAGACODT | 


L 


TAGAGOT 


1 


TAGAHOLr 


1 

1 

- - 1 



Hexadecimal Field 
Eisplacement Name 






TAGAFREE 


DC 


A(0) 


4 


TAGACIN 


DC 


A(0) 


8 


TAGACODT 


DC 


A(0) 


C 


TAGAGOT 


DC 


H«0» 


E 


TAGAHOLD 


DC 


H»0« 



Field Description, Contents, Meaning 

Address of queue of free TAG slots 

elements) 
Pointer to queue of active input TAGs 
Pointer to queue of active output TAGs 
Number free slots left 
Number slots to be held 



(or 



TAKE REQDEST TABLE 



The format of a TAKE request table is; 



w I 



4 I 



Task name of GIVE iequestoi. 



A (TAKE Request Buffer) 



A (TAKE Response Buffer) 



I The TAKE request table corresponds to the GIVE request table. It is built by the task 
I performing the requested service (via a GIVE request by another task) - 
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TANKDSEC 



TANKDSEC: SHL UNIT RECORD TANK 



TaHKDSEC is used to reference buffer data and control information contained in tanks, 
which are unit buffers used to deblock the larger TP buffers. (TP buffers are defined by 
the needs of an individual remote station and their size varies from station to station.) 
STANKPOL in module DMTSHL points to a queue of available tanks- 



I 
I 



TANKCHS 



U I TANKRCB | TAHKSRCB 

I 

8 I 



TAHKCNT 



TASKDATA 



DO I 



Hexadecimal Field 
Displacement Name 




H 
5 
6 
8 
DO 



TANKCHN DC 
TANKRCB DC 
TANKSRCB DS 
TANKCNT DS 
TANKDATA DS 
TANKBND DS 



A(0) 

1C 

1C 

1H 

CL200 

OF 



Field Description, Contents, Meaning 

Tank chain field 

Tank record control byte 

Tank subrecord control byte 

Count of data bytes in tank 

Data area in tank 

Force next to word boundary 
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TAEEi 



TABEA; A TASK SAVE AREA 

TAREA an area associated with each task. This area is used to save the contents of the 

task's PSi and general registers and to flag whether or not a task has infcrmation ready 

to pass. TAREA comprises the first 78 bytes of the storage area defined in each task's 
storage. 



10 



14 



18 



1C 



20 



24 



28 



2C 



30 



34 



38 



3C 



40 



44 



48 



TPSi 



TGREGO 



TGREG1 



TGREG2 



TGREG3 



TGREG4 



TGREG5 



TGREG6 



TGREG7 



TGREG8 



TGREG9 



TGREG10 



TGREG11 



TGREF12 



TGREG13 



TGREG14 



TGREG15 



TREQLOCK 
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TAREA 



Hexadeciial Field 
Displacement Naie 






TPSW 


DS 


1D 


8 


TGREGO 


DS 


IF 


C 


TGREG1 


DS 


IF 


10 


TGREG2 


DS 


IF 


14 


TGRE63 


DS 


1F 


18 


TGREG4 


DS 


IF 


1C 


TGREG5 


DS 


IF 


20 


TGREG6 


DS 


IF 


24 


TGREG7 


DS 


IF 


28 


TGREG8 


DS 


IF 


2C 


TGREG9 


DS 


IF 


30 


TGREG10 


DS 


IF 


34 


TGREG11 


DS 


IF 


38 


TGREG12 


DS 


IF 


3C 


TGREG13 


DS 


IF 


40 


T6REG14 


DS 


IF 


44 


TGREG15 


DS 


IF 


48 


TREQLOCK 


DS 


IF 



Field Description, Contents, Heaning 

PSH with which a teiporarily interrupted task 

resuaes execution 
Save area for general register 
Save area for general register 1 
Save area for general register 2 
Save area for general register 3 
Save area for general register 4 
Save area for general register 5 
Save area for general register 6 
Save area for general register 7 
Save area for general register 8 
Save area for general register 9 
Save area for general register 10 
Save area for general register 11 
Save area for general register 12 
Save area for general register 13 
Save area for general register 14 
Save area for general register 15 
Synchronization lock used to signal 

whether or not a task has information 



268 IBH VM/370 Data Areas and Control Block Logic 



TASKE 



TASKE: A TASK ELEHENT 

TASKE defines syibolic nanes of status infornaticn pertaining to an active task. 

The TASKQ field of SVECTORS points to a queue of task elements, each cf which is defined 
ty this DSECT. The queue consists of one task element (TASKE) for each active task. 






1 — -' " ' 

1 TASKNEXT 






1 


4 


1 TASKSAVE 








8 


1 TASKUAME 








C 


i/////////TASKSPAB/////////| 

t_. : , 


TISKSTAT 


•PS CeTT^ 


__J 



Bezadecimal Field 
Displacement Name 



TASKNEXT DS IF 

TASKSAVE DS IF 
TASKNAME DS CL4 
TASKSPAH DS AL2 
TASKSTAT DS IX 

Bits defined in TASKSTAT 
iliTING^'EQD X»80"^ 
LOCKLIST EQU X«40« 



LliiBO 



TASKID 



EQO X'01 



DS IX 



Field Description, Contents, neaning 

Address of the next element on the task 

element queue 
Address of this task's Task Save Area (TAREA) 
Task name specified ty the task; H bytes long 
Reserved for IBM use 
Status flags associated with the task 



Flag set to 1 when task is ncndispatchable 
Flag set to 1 while task is waiting fcr the 

synchronous lock list 
Flag set to 1 when a task is being 

terminated. 

Number ID fcr the task; 1 byte is assigned by 
the supervisor when task is made active 
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TCTDSECT 



TCTDSECT: TASK CONTROt TABLE 

TCTDSECT defines the format of six tables used by module DHTSHL that are at labels 
$CC0M1, SHCOMI, $PC0H1, $RC0H1, $tJCOHl, and $JCCH1. Each table corresponds to a DMTSHL 
input/output processor and is used by that processor to perform its I/C function. 

The GIVE request table and the GIVE request buffer used by DHTSBL are embedded in the 
task control table at locations X*24» through X«30' and X«3U» through X«40«, 
respectively. 






TCTSTRT 1 TCIEHTY 


1 

1 


4 


TCTRTH 1 


8 


TCTCCW 


TCTEATA 




C 


TCTFLAG 


1 TCTOPCOD 1 TCTCCWCT 




10 


TCTECB 


1 TCTSTAT 1 TCTSFE | 




14 


TCTSAV1 1 


18 


TCTHEXT 1 


1C 


TCTFCS 


1 TCTRCER 1 TCTRCET 


1 
1 


20 


TCTCOM 1 


24 




TDEVSYNC 


1 

1 
i 


28 


TDEVREQH I 


2C 


TDEVHEQ 1 


30 


TDEVRESP 1 


34 


TDEVRLEH 


1 TDEVFDH I///TDIVRESV//I TDE7S0PT 


1 

1 


38 


TDEVTAG 1 


3C 


TDEVFIOA 1 


40 
44 


TDEVLIHK 1 


48 


TSW1 


1 TSH2 1 TSi3 1 TSyl4 


1 

• 


4C 
50 


TCTTOVM 1 


54 




TCTTANK 


1 

1 


58 


TCTBDFER I 


5C 


TCTTNKLB | 

L 


TCTTNKCT | TCTEDILH | ICTBDFCT 


1 

1 
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TCTESICT 



Hexadecimal 


Pield 






Displacement 


Name 









TTCT 


DS 


OH 





TGTSTRT 


DS 


CL2 


2 


TCTENTY 


DS 


CL2 


H 


TCTRTN 


DS 


CL4 


8 


TCTGCW 


DS 


CL1 


9 


TCTDATA 


DS 


AL3 


C 


TCTFLAG 


DS 


CL1 


D 


TCTOPCOD 


DS 


CL1 


E 


TCTCCWCT 


DS 


AL2 


10 


TCTECB 


DS 


CL1 



Field Description, Contents, Meaning 



Branch to proper processor entry 

Address portion modified by processor 

Branch to next processor via coimutator 

CCW for device operation code 

Address of data transferred 

Flags on CCi 

Save area for CCW operation cede 

CCH count of data transferred 

Event control block 



lits defined in TCTECB 
TCTBOSY EQD XMO« 



Device busy bit 



11 



TCTSTAT DS CLi 

fiii§ ^§fiB§^ is TCTSTAT 
TCT1052 EQU XMO» 
TCTREL EQD X»04» 
TCTOPEN EQU X*80« 
TCTACT EQD X»40' 



12 


TCTWFB 


DS 


AL1 


14 


TCTSAV1 


DS 


1F 


18 


TCTNEXT 


DS 


IF 


1C 


TCTFCS 


DS 


AL2 


1E 


TCTRCBR 


DS 


CLI 


IF 


TCTRCBT 


DS 


CLI 


20 


TCTCOM 


DS 


IF 



Status flags 



TCT status flags for 1052 

Interlock release request for console 

TCT open bit 

Action required on this TCT 

Waiting for buffers 

Save area for processor routine 

Next TCT in chain 

Function control sequence mask 

RECV record control block 

Trans record control block 

Pointer back to commutator 



Isx^decimal Locations 24 through 30 Comprise the SKL 
Give Request Table 



24 
28 
2C 
30 



TDEVSYNC DS IF 

TDEVREQN DS CL4 

TDEVREQ DS 1A 

TDEVRESP DS 1A 



Synch lock 
File access name 
Request buffer address 
Response buffer 



£®ll^®£ifi§2 Locations 34 through 4C Comprise the Give Reguest 
lillf^I is ife§ 1511 2f § Zil§ l§33§st Element (as sh ow n 
is Appendix C) 

Request length 

Request function 

Reserved for IBH use 

Subordinate option byte 

Tag address 

File I/O area 

Link name 

Device switch 1 

Device switch 2 

Device switch 3 

Device switch 4 

Virtual machine output destination 

Next tank to generate output 

Address of current buffer 

Maximum number of tanks assignable 

Current number assigned 

Haximum number of buffers assignable 

Current number assigned 



34 


TDEVRLEN 


DS 


AL1 


35 


TDEVFON 


DS 


AL1 


36 


TDEVRESY 


DS 


AL1 


37 


TDEVSOPT 


DS 


AL1 


38 


TDEVTAG 


DS 


1A 


3C 


TDEVFIOA 


DS 


1A 


40 


TDE7LINK 


DS 


CL8 


48 


TSH1 


DS 


AL1 


49 


TSW2 


DS 


AL1 


4A 


TSW3 


DS 


AL1 


4B 


TSi4 


DS 


AL1 


4C 


TCTTOVM 


DS 


CL8 


54 


TCTTANK 


DS 


IF 


58 


TCTBDFER 


DS 


IF 


5C 


TCTTNKLM 


DS 


CLI 


5D 


TCTTNKCT 


DS 


CLI 


5E 


TCTBDFLH 


DS 


CLI 


5F 


TCTBDFCT 


DS 


CLI 
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Appendixes 



Infcriation in the following appendixes supplements the text in Sections 1 
rough 3 of this publication: 

"Appendix A. CP and RSCS Equate Syitols" contains assembler language equate 
symbols used in CP and RSCS to reference data. 

"Appendix B. RSCS Control Areas" shows those constants and variables used 
during execution of RSCS tasks. 

"Appendix C. RSCS Request Elements" contains information on and formats of 
tables used during RSCS task-to-task communication. 

"Appendix D. CMS Equate Symbols" contains Assembler language equate symbols 
used in CMS to reference data. 

"Appendix E. Data Areas and Control Block References" lists the names of CP, 
CMS, and RSCS control blocks. This appendix (1) shows module references to 
data areas and/or control blocks and (2) gives information on how certain 
data areas or control blocks are created and released- 
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Appendix A. CP and RSCS Equate Sumbois 



This Appendix contains assembler language equate syatols used tc reference CF 
and RSCS data for: 

YM/370 Device Classes, Types, Models, and Features 

YM/370 Machine Usage 

VM/370 Extended Control Registers 

VM/370 CP Osage 

VM/370 Registers 
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VM/370 DEVICE CLASSES, TYPES, MODELS, AND FEATDBES 



Field 






Name 






CLASTERM 


EQU 


X'80' 


TYP2700 


EQU 


X'40' 


TYP2955 


EQO 


TYP2700 


TYPTELE2 


EQD 


X»20» 


TYPTTY 


EQO 


X»20» 


TYPIBM1 


EQO 


XMO« 


TYP2741 


EQO 


XM8» 


TYP1050 


EQO 


X' 14* 


TYPDNDEF 


EQO 


XMC» 


TYPBSC 


EQO 


X'80« 


TYP3210 


EQO 


X'OO* 


TYP3215 


EQO 


TYP3210 


TYP2150 


EQD 


TYP3210 


TYP1052 


EQO 


TYP3210 


FTRDIAL 


EQO 


X»01» 


CLASGBAF 


EQO 


x»ao» 


TYP2250 


EQO 


X«80» 


TYP2260 


EQO 


X«40» 


TYP2265 


EQO 


X'20« 


TYP3066 


EQO 


XMO* 


TYP1053 


EQO 


X»08« 


TYP3277 


EQO 


X«04« 


TYP3278 


EQO 


X»01« 


TYP3284 


EQD 


X'02' 


TYP3286 


EQO 


TYP3284 


TYP3287 


EQO 


TYP3284 


TYP3288 


EQD 


TYP3284 


TYP3138 


EQO 


TYP3277 


TYP3148 


EQO 


TYP3277 


TYP3158 


EQO 


TYP3277 


FTROPRDR 


EQO 


X»80« 


CLAS0R1 


EQD 


X»20' 


TYPRDR 


EQD 


X'80« 


TYP2501 


EQD 


X»81» 


TYP2540R 


EQD 


X»82' 


TYP3505 


EQO 


X»84' 


TYPm42R 


EQO 


X»88» 


TYP2520R 


EQO 


X«90' 


TYPTIMER 


EQD 


X»40» 


TYPTR 


EQO 


X»20« 


TYP2495 


EQO 


X»21» 


TYP2671 


EQD 


X»22» 


TYP1017 


EQO 


X»24» 


CLASORO 


EQD 


X'10« 


TYPPON 


EQO 


X«80» 


TYP2540P 


EQO 


X«82' 


TYP3525 


EQD 


X'84' 


TYP14U2P 


EQD 


X»88' 


TYP2520P 


EQO 


X*90' 


TYPPRT 


EQO 


X'40» 


TYPn03 


EQO 


X'UI* 


TYP3211 


EQD 


X»42« 


TYP3203 


EQD 


X»U3' 


TYP1U43 


EQD 


X'4U' 



Field Description, Contents, Meaning 

Terminal device class 

2700 bisyncronous line 

2955 communications line 

Telegraph terminal control type II 

Teletype terminal 

IBM terminal control type I 

2741 communications terminal 

1050 communications terminal 

Terminal device type is undefined 

Bisyncronous line for 3270 remote stations 

3210 console 
3215 console 
2150 console 

1052 console 

Dial feature 

Graphics device class 

2250 display unit 
2260 display station 
2265 display station 
3066 console 

1053 printer 

3277 display station 

3278 Model 2A system console 
3284 printer 

3286 printer 

3287 printer 

3288 printer 

3138 system console 
3148 system console 
3158 system console 

Operator identification card reader 
Dnit record input device class 

Card reader device 

2501 card reader 

2540 card reader 

3505 card reader 

1442 card reader/punch 

2520 card reader/punch 

Timer device 

Tape reader device 

2495 magnetic tape cartridge reader 

2671 paper tape reader 

1017 paper tape reader 

Dnit record output device class 

Card punch device 
2540 card punch 
3525 card punch 

1442 card punch 
2520 card punch 
Printer type device 
1403 printer 

3211 printer 

3203 printer (3211 and 14C3) 

1443 printer 
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Field 






Name 






j TYP38C0 


EQO 


X»45» 


TYPTP 


EQD 


X'20« 


TYP1018 


EQD 


X»24« 


FTRDCS 


EQO 


X«01« 


1 FTR4iCGM 


EQD 


X»80» 



CLASTAPE EQD X»08» 



TyP2401 


EQD 


X«80» 


TYP2415 


EQD 


X«40« 


TYP2420 


EQD 


X»20« 


TYP3420 


EQO 


X'10« 


TYP3410 


EQO 


X«08' 


TYP3411 


EQO 


TYP3410 


FTR7TRK 


EQD 


X«80« 


FTRDLDNS 


EQD 


X«40» 


FTRTRANS 


EQD 


X»20» 


FTRDCONV 


EQD 


X»10» 


CLASDASD 


EQD 


X«04' 


TYP2311 


EQD 


X»80» 


TYP2314 


EQO 


X»40» 


TYP2319 


EQD 


TYP23U 


TYP2321 


EQD 


TYP2311 


TYP3330 


EQO 


X'10' 


TYP3333 


EQO 


TYP3330 


TYP3350 


EQO 


X»08' 


TYP2301 


EQO 


TYP2311 


TYP2303 


EQO 


TYP2311 


TYP2305 


EQD 


X'02' 


TYP33itO 


EQD 


X»01« 


FTRRPS 


EQD 


X»80« 


FTREXTSN 


EQD 


X»40» 


FTR2311T 


EQD 


X'20' 


FTR2311B 


EQO 


XMO« 


FTR35MB 


EQD 


X'08' 


FTR70MB 


EQO 


X»04» 


FTRRSRL 


EQD 


X»02' 


1 ?IRTOAL 


EQD 


X'OV 


1 SYSVIRT 


EQO 


X»20' 


FTRVIRT 


EQD 


X»01» 


CLASSPEC 


EQO 


X'02' 


TYPCTCA 


EQD 


X»80» 


TYP3704 


EQO 


X'40' 


TYP3705 


EQO 


TYP3704 


TYP3851 


EQD 


X»20« 


TYPSRF 


EQD 


X'04» 


TYPDNSDP 


EQD 


X'OV 


FTRTYP1 


EQD 


X'lO* 


FTRTYP2 


EQD 


X»20» 


FTRTYP3 


EQD 


FTRTYP2 


FTRTYP4 


EQO 


FTRTYP1 



Field Description, Contents, Meaning 

3800 Printing subsystem 
Tape punch device 
1018 paper tape punch 
DCS feature 

3800 has four HCGH available. Note that FTREXTSN (X'40») is 
also used for a 3800 printer. 

Magnetic tape device class 

2401 tape drive 
2415 tape drive 
2420 tape drive 
3420 tape drive 

3410 tape drive 

3411 tape drive 

7-track feature 
Dual density feature 
Translate feature 
Data conversion feature 

Direct access storage device class 

2311 disk storage drive 

2314 disk storage facility 

2319 disk storage facility 

2321 data cell drive 

3330 disk storage facility 

3333 disk storage facility 

3350 disk storage facility 

2301 parallel drum 

2303 serial drum 

2305 fixed head storage device 

3340 disk storage facility 

Rotational positional sensing (RPS) installed (3340) 

Extended sense bytes (24 bytes) 
(= 7DEV231T) Top half of 2314 used as 2311 
(= VDEV231B) Bottom half of 2314 used as 2311 

35 multibyte data module mounted (3340) 

70 multibyte data module mounted (3340) 

Reserve/release are valid CCW operation codes 

Device is a 33307 virtual machine 

Device is a 3330V system virtual machine 

3330 virtual (MSS) volume 

Special device class 

Channel-to-channel adapter 

3704 programmable communication control unit 

3705 programmable communication control unit 
3851 Mass Storage Controller 

SRF device (#7443) 

Device not supported by VM/370 

Type 1 channel adapter (370x) 

Type 2 channel adapter (370x) 

Treat as type 2 channel adapter (370x) 

Treat as type 1 channel adapter (370x) 
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11/320 125 ATE SYMBOLS — MACHINE OSAGE 



Field 
Name 



Field Description, Contents, Meaning 



Eits def 


ined 


in Standard/Extended 


PSW 




EXTMODE 


EQD 


X»08» 




Bxt 


12 


- extended mode 




MCHEK 


EQD 


X»04' 




Bit 


13 


- machine check enabled 




HfilT 


EQD 


X»02' 




Bit 


14 


- wait state 




PHOBMODE 


EQO 


X»01» 




Bit 


15 


- problem state 




Bits def 


ined 


in Extended PSH 










PERMODE 


EQO 


X«40» 




Bit 


01 


- PEB enabled 




TBANMODE 


EQO 


X»04' 




Bit 


05 


- translate mode 




lOMASK 


EQO 


X»02« 




Bit 


06 


- summary I/O mask 




EXTHASK 


EQO 


X»01» 




Bit 


07 


- summary external mask 




Bits def 


ined 


in Channel 


Status word 


CSW) 




ATTN 


~EQO 


X»80' 




Bit 


32 


- attention 




SM 


EQO 


X'40« 




Bit 


33 


- status modifier 




CDE 


EQO 


X'20» 




Bit 


34 


- control unit end 




BUSY 


EQD 


X»10» 




Bit 


35 


- busy 




CE 


EQO 


X'08» 




Bit 


36 


- channel end 




DE 


EQO 


X»OU« 




Bit 


37 


- device end 




UC 


EQD 


X«02« 




Bit 


38 


- unit check 




UE 


EQO 


X»01« 




Bit 


39 


- unit exception 




PCI 


EQD 


X'80« 




Bit 


40 


- program-control interrupt 




IL 


EQD 


X«40» 




Bit 


41 


- incorrect length 




PBGC 


EQD 


X»20' 




Bit 


42 


- program check 




PBTC 


EQD 


X' 10* 




Bit 


43 


- protection check 




CDC 


EQO 


X«08' 




Bit 


44 


- channel data check 




CCC 


EQD 


X'04» 




Bit 


45 


- channel control check 




IFCC 


EQD 


X'02' 




Bit 


46 


- interface control check 




CHC 


EQD 


X'01» 




Bit 


47 


- chaining check 




Bits def 


ined 


in Channel 


Command Word 


(CCW) 




CD 


"eqo 


X»80» 




Bit 


32 


- chain data 




CC 


EQO 


X»40' 




Bit 


33 


- command chain 




SILI 


EQO 


X»20« 




Bit 


34 


- suppress incorrect length 


indicator 


SKIP 


EQD 


XMO* 




Bit 


35 


- suppress data transfer 




PCIF 


EQO 


X»08« 




Bit 


36 


- program-control interrupt 


FETCH 


IDA 


EQO 


X»04» 




Bit 


37 


- indirect data address 




Bits def 


ined 


in Sense B^te 


(common 


12 S2st devices) 




CMDREJ 


~EQD 


X»80« 




Bit 


- 


command reject 




INTREQ 


EQD 


X'40' 




Bit 


1 - 


intervention required 




EOSODT 


EQO 


X'20» 




Bit 


2 - 


bus out 




EQCHK 


EQO 


XMO« 




Bit 


3 - 


equipment check 




DATACHK 


EQO 


X»08' 




Bit 


4 - 


data check 
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Field 
Name 

Bits defined in CBEGO 
« BYTE 

BLKMPX EQD X«80' 
SSMSUPP EQD X»40» 
TODSYNC EQD X«20» 

• BYTE 1 

PAGE4K EQD X»80« 

PaGE2K EQD X»40« 

SEG1H EQD XMO' 



Field Description, Contents, Meaning 



Bit 00 - enable block anltiplesing 
Bit 01 - enable SSH suppression 
TOD synchronous control 



Bit 08 - use 4K pages 
Bit 09 - use 2K pages 
Bit 11 - use IM segments 



MFAHASK 


EQD 


X«80» 


EBSMASK 


EQD 


X' 40' 


XCMASK 


EQD 


X'20' 


SYNCMASK 


EQD 


XMO* 


CKCMASK 


EQD 


X«08« 


CPTMASK 


EQD 


X'04' 


• BYTE 3 






INTMASK 


EQD 


X«80» 


KEYMASK 


EQD 


X»40' 


SIGMASK 


EQD 


X»20» 


1 Bits defined 


in CREG8 


1 • BYTE 3 






j PFSFCl 


EQD 


X«80« 


1 RESPCL 


EQD 


X»40« 


1 SCHEDCL 


EQD 


X»20» 


! TIHECL 


EQD 


XM0» 


1 USERCL 


EQD 


X'08« 


1 PBIVCL 


EQD 


X»04« 


1 DASDCL 


EQD 


X'02» 


1 SEEKCL 


EQD 


X«01' 


1 • BYTE 4 






1 SPROFCL 


EQD 


X«80« 


Bits def 


kssJ 


in CREG9 


• BYTE 






PERSDBR 


EQD 


X»80» 


PERIFET 


EQD 


X»40» 


PERSALT 


EQD 


X'20« 


PER6PBS 


EQD 


X'10* 



Bits defined in CREG14 
• BYTE 



Bit 16 - malfunction alert mask 

Bit 1 f ■= ssergency sxgnal mask 

Bit 18 - external call mask 

Bit 19 - TOD synchronous check mask 

Bit 20 - mask on clock comparator interrupt 

Bit 21 - mask on processor timer interrupt 



Bit 24 - mask on interval timer interrupt 

Bit 25 - mask on operator key interrupt 

Bit 26 - mask on external signals 2 through 7 



Sample hardware/software utilizations 

Trace response class 

Trace scheduler activity class 

Execution timing class 

Sample user resource usage class 

Privileged operands class 

Sample DASDs: utilizations class 

Trace DASD seek activity 



Trace system profile class 



Bit 00 
Bit 01 
Bit 02 
Bit 03 



HARDSTOP 


EQD 


X»80« 


Bit 


00 


SYNCLOG 


EQD 


X'40« 


Bit 


01 


lOLOG 


EQD 


X»20» 


Bit 


02 


RECOVRPT 


EQD 


X»08» 


Bit 


04 


CONFGRPT 


EQD 


X»04» 


Bit 


05 


DAMAGRPT 


EQD 


X'02' 


Bit 


06 


HARNGRPT 


EQD 


X»01» 


Bit 


07 


• BYTE 1 










ASYNELOG 


EQD 


X'80» 


Bit 


08 


ASYHFLOG 


EQD 


X«40» 


Bit 


09 



monitor successful branches 
monitor instruction fetches 
monitor storage alteration 
monitor register alteration 



check stop control 
synchronous logout control 
I/O logout control 
recovery report mask 
configuration report mask 
external damage report mask 
warning condition report mask 



asynchronous extended logout control 
asynchronous fixed logout control 
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IWZ370 IfiOATE SYMBOLS — CP OSAGE 



lieia 
Nane 



Field Description, Contents, Meaning 



Bits defined for TRANS lacro 



BBIMG EQO 

DEFER EQD 

LOCK EQO 

lOERETN EQO 

SYSTEM EQD 

VFAOLT EQO 



X»80« 
X'40» 
X»20' 
XMO' 
X»08» 
X'04» 



Bring requested page 
Defer execution until page in core 
Lock page for I/O operation 
Return I/O errors to caller 

Call to DMKPTRAB for system virtual machine space 
DHKPTRAN call for virtual page. Caller will not 
utilize real address 



Equates for Parameter Field 
DELSEGS EQO ~ X'80« 



DELPAGES 


EQO 


X»40» 


VRALOC 


EQO 


X'20» 


PAGTONLY 


EQO 


X'10» 


NEWPAGES 


EQO 


X»08« 


HEWSEGS 


EQO 


X«04» 


KEEPSEGS 


EQO 


X«02» 


OLDTHSEG 


EQO 


X»01» 


Bits def, 


ined 


for Terminal 


HOTRESP" 


EQO 


X»4000»" 


EBBHSG 


EQO 


X«0800' 


SORET 


EQO 


X«0400» 


DFRET 


EQO 


X»0200' 


OPERATOR 


EQO 


X»0100« 


LOGDROP 


EQO 


X»80» 


LOGHOLD 


EQO 


X«40« 


PRIORITY 


EQO 


X»20« 


?HGESIO 


EQD 


X»10» 


NOAOTO 


EQD 


X«04» 


ALARM 


EQO 


X«02« 


SOTIME 


EQD 


X'OV 


INHIEit 


EQD 


X«08» 


EDIT 


EQD 


X«04« 


DCASE 


EQD 


X»02» 


Equates : 


for Sfool File Rei 


CB6SHQ 


EQO 


X«0200» 


CHGRDV 


EQD 


X'0100' 


ACTSFB 


EQD 


X'80' 


OPHSFB 


EQD 


X»40« 


BELSFB 


EQD 


X'20' 


CBGSFB 


EQD 


XMO« 


ADDSFB 


EQD 


X*08» 


PRTCHH 


EQD 


X'04« 


PCHCHN 


EQD 


X»02' 


RERCBN 


EQD 


X»01« 


Equates : 


for SWTCHVM macro 



SfMONLOK EQO X'04» 
S¥MNOOPD EQD X'02» 
SVMSTAY EQD X*01» 



|5I Calls to DMRELDRT/DHKELIRL 
Release the segment tahles 
Release the page/swap tables 
Attempt allocation of Virtual=Real area 
Only one page table and return 
Build new page/swap table 
Build new segment table 

Retain information in old segment table 
VMSEG pointer in 7MEL0K valid 



I/O via DMKQCS 

Output - Message not a command response 
Output - control program error message 
Output - return immediately after call 
Output - FRET buffer after queueing 
Output - message for system operator 
Output - logoff and drop line after message 
Output - logoff and hold line after message 
Output - write this message immediately 
i/b request generated by virtual machine 
Output - suppress automatic carriage return 
Output - sound the audible alarm 
Output - suppress time stamp on message 
Input - prevent display of this data 
Input - edit input data for corrections 
Input - translate data to uppercase 



Recovery Eoutine - DMKCKS 

Checkpoint a SHQELCK 

Change attributes of real device 

File being printed or punched 

An open print-punch file 

Delete SFBLOK from checkpoint 

Change existing SFELOK 

Add new SFBLOK to recovery cylinder 

SFBLOK goes on print chain 

SFBLOK goes on punch chain 

SFBLOK goes on reader chain 



Dnlock only the current virtual machine 
Lock virtual machine with SOOPDT option 
Stack CPEXBLOK for current processor 
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Field 
Name 



Field Description, Contents, Meaning 



Monitor Class 
MNCLPERF EQD 



and Code 
X»00»~ 



MNCOSYS EQD X 

MNCOTH EQD X 

MNCOTT EQD X 

MNCOSDS EQD X 

MNCLRESP EQD X 

MNCOBBD EQD X 

MNCOWRIT EQD X 

MNCOERD EQD X 

MNCLSCH EQD X 



MNCODQ 
MNCOAQ 
MNCOAEL 


EQD 
EQD 
EQD 


X 
X 
X' 


0002» 

'0003' 

0004' 


MNCLDSER 


EQD 


X 


04« 


MNCODSER 


EQD 


X' 


0000' 


MNCLINST 


EQD 


X' 


05' 


MKCOSIM 


EQD 


X' 


0000' 


MNCLDAST 


EQD 


X" 


06» 


MNCODASH 
MNCODAS 


EQD 
EQD 


X' 
X' 


0000' 
0001' 


MNCLSEEK 


EQD 


x« 


07' 


MNCOCYL 


EQD 


X' 


0000' 


MNCLSYS 


EQD 


X' 


08' 


MNCOEA 


EQD 


X' 


0002' 



0000' 
0061' 
0062' 
0063' 
01' 

0000' 
0001' 
0002' 

02» 



Definitions 

Monitor perform class 

Perform class, system performance 

Monitor tape header record 

Monitor tape trailer record 

Monitor collection suspension record 

Monitor response class 

Response class, begin read code 
Response class, write code 
Response class, end read code 

Monitor schedule class 

Schedule class, drop queue code 
Schedule class, add to queue code 
Schedule class, add to eligible list code 

Monitor user class 

Dser class, user data 

Monitor instruction simulation class 

Instruction class; instruction simulation code 

Monitor DASD/tape class 

DASTAP class, first record 
DASTAP class, data records 

Monitor DASD class 

DASD class, seeks code 

Monitor system profile class 

SYS class, DASD data 
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Field 
Nane 



Field Description, Contents, Heaning 



Equates for SIGNAL Macro 



SIGSENSE 


EQO 


x' 


'01» 


SIGXC 


EQD 


X 


02» 


SIGEMS 


EQU 


X 


•03« 


SIGSTART 


EQO 


X' 


04» 


SIGSTOP 


EQU 


X 


•05» 


SIGREST 


EQD 


X' 


06» 


SIGIPR 


EQD 


X 


'07' 


SIGPR 


EQO 


X 


08 » 


SIGSSS 


EQO 


X 


09» 


SIGIML 


EQD 


X 


•0A» 


SIGICR 


EQD 


X 


'OB' 


SIGCR 


EQO 


X 


'OC 


SIGQOI 


EQO 


X 


800' 


SIGEXT 


EQD 


X 


'400* 


SIGSYNC 


EQO 


X 


'200' 


SIGSHD 


EQD 


X 


'100' 


SIGCLK 


EQO 


X 


'080' 


SIGAPR 


EQD 


X 


'800' 


SIGRES 


EQD 


X 


'400' 


SIGWAKE 


EQD 


X 


200' 


SIGDISP 


EQD 


X 


100' 



Sense order code 

External call order code 

Emergency signal order code 

Start order code 

Stop order code 

Restart order code 

Initial prograa reset order code 

Program reset order code 

Stop and store status order code 

Initial microprogram load order code 
Initial processor reset order code 
Processor reset order code emergency signals 

Quiesce emergency signal 

Extend emergency signal 

Clock synchronization emergency signal 

Shutdown emergency signal 

Clock check signal (external call signals) 

Automatic processor recovery (external call signal) 
Resume external call signal 
Wakeup external call signal 
Dispatch external call signal 
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I1?Z370 REGISTERS 

Fieia 

Nane Field Description, Contents, Meaning 



SYffbolic Register l3uates 

RO 

R1 

R2 

R3 

B^ 

R5 

R6 

R7 EQD 7 \ General register definitions 

R8 

Rg 

R10 

R11 

R12 

R13 

R14 

R15 

YO 

Y2 EQD 2 [^ Floating-point register definitions 

Y4 

Y6 

CO 
CI 
C2 

C3 

ca 

C5 

C7 EQD 7 \ Control register definitions 

C8 

C9 

C10 

C11 

\^ t £, 

CIS 

cm 

C15 



EQD 





EQD 


1 


EQD 


2 


EQD 


3 


EQD 


4 


EQD 


5 


EQD 


6 


EQD 


7 


EQD 


8 


EQD 


9 


EQD 


10 


EQD 


11 


EQD 


12 


EQD 


13 


EQD 


14 


EQD 


15 


EQD 





EQD 


2 


EQD 


4 


EQD 


6 


EQD 





EQD 


1 


EQD 


2 


EQD 


3 


EQD 


4 


EQD 


5 


EQD 




EQD 


7 


EQD 


8 


EQD 


9 


EQD 


10 


EQD 


11 


■or>n 


■JO 


EQD 


13 


EQD 


14 


EQD 


15 
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Appendix B. RSCS Control Areas 



This appendix lists the control areas used during task processing- Infcrsaticn 
such as lists of synchronous locks, channel programs, TAKE request tables and 
buffers, and various work constants are included in these areas. 
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AXS MONITOR CONTROL AREA 

The AXS Monitor Control Area is a data area used by THTAXS to set up synch locks, a TAKE 
request table, a TAKE request and response buffer, and an input buffer. 



Field 
Naie 
AXSNAHE 
REXNAHE 

AXSLOCKS 



ARRLOCK 
CMDLOCK 



DC 0F»0*,CL4'AXS« 

DC 0F«0«,CL4«REX» 

DC A (ARRLOCK) 

DC A (REQLOCK) 

DC X»80«,AL3(CMDLOCK) 



DC F • » 
DC F»0» 



Field Descr ip tion, Conte nts, Meaning 
Task name for AXS routine 
Task name for control monitor 

File tag arrival synchronous lock address 
Request arrival synchronous lock address 
Coniand synchronous lock address 

File tag arrival synchronous lock 
Comiand synchronous lock 



AXSTAKE 



DC 0F«0» 

DC CL4» • 

DC AL1 (L'AXSREQ) AL3(AXSREQ) 

DC A (AXSRESP) 



TAKE request table 

Giver's task naae 

Pointer to request buffer (input) 

Pointer to response buffer (output) 



AXSREQ 
AXSRESP 



DC XLiaO'OO* 
DC XL136»00« 



TAKE request buffer 
TAKE response buffer 



CMDIN 
CMDINPGS 



DC CL122' » 
DC X»00» 



Input buffer for coimand eleaent 
Coinand in progress switch 



AXSCSAVE 



DC 18F»0« 



Coiion routine save area 
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REX MONITOR CONTROL AREA 

The REX Monitor Control Area is a data area used by EMTREX to initialize the DMTAXS and 
DMTLAX modules, point to queues of system data (such as the link table chain and the 
chain of tag elements) , set up a series of synch locks for HEX processing function, set 
up a console element, read and write channel programs, a console table buffer, a message 
buffer, a TAKE request table, and buffer, and various work constants. 



Field 

Name 

REXREX 

REXAXS 

REXLAX 

REXTVECT 



REXEND 
REXLOCKS 

ATTNLOCK 
REXCONSL 



EMTREXCN 

CONSADDH 

REXREAD 
REXWRITE 

REXIN 

REXMSG 

DMTREXID 

REXOBT 

REXTAKE 



REXREQ 
REXRESP 



DC 0F»0',CL4»REX» 

DC 0F»0«,CL8«DMTAXS' 

DC 0F»0»,CL8»DMTLAX' 

DC 0F»0' 

DC V{DMTSYSLK) 

DC V(DMTSYSRT) 

DC V(DMTSYSPT) 

DC V(DMTSYSTQ) 

DC V(DMTCOMVC) 

DC V(DMTSYSND) 

DC 0F«0» 

DC X«00',AL3(REQLOCK) 

DC X»00»,AL3(ATTNLOCK) 

DC X» 40 ',AL3 (REXCONSL) 

DC X»80',AL3(PROGLOCK) 

DC 0F'0»,X»00«,AL3(0) 

DC F«0» 

DC AL2(C0NSADDR) 

DC AL1(1) 

DC AL1(TYP3210) 

DC A (0) 

DC 2F'0» 

DC X'00» 

DC 3X«00» 

EQO REXCONSL 

EQO X»009' 

CCH X'OA', REXIN , SILI, L« REXIN 

ecu X'09»,REXODT+2,SILI,0 

DC CL130' • 

DC CL11»M 0P» 

EQO REXMSG«-2 

DC CL130' » 

DC 0F»0» 

DC CL4» » 

DC AL1 (L'REXREQ) ,AL3 (REXREQ) 

DC A (REXRESP) 

DC XL140*00» 

DC AL1(0) 



li^i^ Description, Contents, Me aning 

Task name 

AXSname 

LAXname 



Link tat-Le chain 
Route table chain 
Switchatle port chain 
Tag slot queue 
Common routine vector 
End of HEX initial load 

Main REX wait list 

Request arrival synchronous lock address 
Console attention synchronous lock address 
Console I/O synchronous lock address 
Program check synchronous lock address 
Console attention lock 

Synchronous lock for I/O operation 

CDD console device address 

One byte requested on unit check 

Console device type code 

Channel program address to be filled in 

S"""© conditio" code ^nd endi^o CSW 

return information 
Sense return information en 

unit check 
Reserved for IBM use 
External name 

Eefault console cuu 

Reader operator response 
Type a console message 

Console input buffer 

MSG command start 

Transfer user identification 

Output buffer 

Request TAKE table 

Sending task name filled in by 

TAKE manager 
Address and length of 

request buffer 
Address of response buffer 

TAKE request buffer 

Never any response messages 
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SHL MONITOR CONTROL AREA 

The SML Monitor Control Area is used to define various constants, save areas, BSC control 
sequences, channel command words, and bit settings used during SHL processing. 



Field 

Name 

CEDFFER 

CICSOOT 

CFCSSTD 

FCSCTEMP 

CTEMP 

CMAXDDP 

CECBCNTO 

CBCBCNTI 

CEDFLAST 

CRESP 

CREGS 

CRETREGS 

$COMEXIT 

CBCB 
CSETBCB 



CCSi 

COLDRCB 

CDNITCMD 

CLASTCAW 



DC 


A(0) 


DC 


X«8FCF« 


DC 


X»88C1« 


DC 


AL2(0) 


DC 


H»0» 


DC 


H«3» 


DC 


AL1 (0) 


DC 


AL1 (X»80») 


DC 


AL1 (0) 


DC 


AL1 (X»80») 


DC 


H«0» 


DC 


lOX'OO* 


DC 


AL1 (0) 


DS 


3F 


DS 


3F 


DC 


A($START) 


DC 


X»00« 


DC 


X'00» 


DS 


OF 


DC 


XL8«00' 


DC 


X'OO' 


DC 


X»00« 



Ii®l^ Description, Contents, Meaning 

Active communications buffer 

Last FCS transmitted tc HASP 

Standard FCS 

FCS compare area 

Temporary storage 

Maximum repeated blocks 

First byte of halfword 

Elock check count out 

Spacer 

Elock count character expected 

Save of start of last buffer 

Response character received 

Register save area 

Save area 

COMSDD initial entry point 

Last ECE sent for reset 



Force fullword alignment 
Temporary storage for CSU 
Last RGB sent 
Command code storage 



DC 



F»0» 



CCW address save 



BDFSYNSi 



STPPNONE 

OFLSW 

GEQBDFS 

SCOMBUSY 

CUHFAKE 

CACKSH 

AEAECB 
AEACDD 
AECCHA 

AEASIOCC 

AEACSH 

AEASENSE 

AESAV 



XSTXSEQ 
XFTBSEQ 
XACKSEQ 
XNAKSEQ 
XSYNSEQ 



DC 



X»00» 



Bits defined in BDFSYNSW 

EQO X»80» 

EQO X«40» 

EQO X'20» 

EQD XMO« 

EQO X'08' 

EQD X»04» 



Buffer synchronization switch 



Stop all buffering 

Flush buffer 

Stop dequeuing buffers 

Communications inactive 

Dummy read on for unit exception recovery 

JCK received 



DC F'O' Synchronous lock 

DC X»0000» ,AL1 (1) ,AL1 (TYP2700) 

DC A(CCTCCW) Adapter CCW addr 

EQD * SIO condition code 



DC 
DC 
DC 



2F'0' 
F"0' 
8F«0' 



Control Segue nee s 

DC AL1 (XLDR,XSTX) 

DC AL1 (XTRL,XETB) 

DC AL1 (XDLE,XACKO) 

DC AL1 (XSYN,XNAK) 

DC AL1 (XSYN,XSYH,XSYN,XSYN) 



adapter ending CSW 
adapter sense byte 
$SIO register save area 



Start-of-text sequence 
End-of-text-block sequence 
positive acknowlegement sequence 
Negative acknowlegement sequence 
Synchronization sequence 
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Field 
Nane 



Channel Command Words 



Field ggscrip t ign. Contents, Heanin< 



I CCHS 
CCWA 
CCWB 
CCWC 



CCWD 



CCWOFF 

WHITE 

BFAD 

NOP 

SENSE 

SENSE 

DISABL] 



Nciial Data Write with Return Data Read 

CCH 1,XSYNSEQ,CD+SILI,U Synchronization sequence 

CCS 1 ,0 ,CC't-siLI, write buffer 

CCH 1,XETBSEQ,CC+SILI,2 Write ending sequence 

CCW 2,0,SILI,0 Read return data 

Dummj Read To Turn Off Lost Data Sense 

CCW 2,0,SILI«-SKIP,65000 



DISABLE command 
CCW X'2F*,0,SILI,1 



jsyu 


X'OV 


EQD 


X'02' 


EQD 


X«03' 


EQD 


X»04' 


EQO 


X«04' 


EQD 


X»2F« 



Eisable 

Adapter write command cede 

adapter read command cede 

Adapter NOP command code 

adapter sense command code 

Adapter sense command code 

Adapter disable command code 
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Appendix C. RSCS Request Elements 



elements. These elements are used by BSCS tasks in task-to-task cciiunication. 
The information provided includes: 

• The name of the module that builds the element 

• The function performed by the element 

• A brief description of the element's usage 

• The format of the element 

• Any operational notes that might be useful in understanding how the element 
is used 
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BUILT BY: DHTCMX 

FOVCTION: Execute an AXS coimand 

DISCKIPTION: This ALERT element is passed via ALERT to the AXS task (DHTAXS) to request 
second-level pj^ocessing of ORDER and PDRGE conaands. 



I Length | Function I Response | | 

I (n-1) I Code: X»10«,XM1« | Code | Hodifiers I 
I 1 

H I linkid I 



C I spcolid count 
I (n-X'EM/2 



spoolid 



10 I 



spoolid 



spoolid 



OPERATIONAL VOTES 

The liakid field specifies the affected link. The spoolid fields are binary half words and 
specify the files enqueued on the specified link which are to ie reordered or purged. The 
spoolid const field is a binary halfword and specifies the total nunter of spoolid fields 
present. The leanings of the other fields follow. 

FuBctioB Coi«: x'10* 

IcspcBse Ceies: 

X'OO' Ileaent accepted for processing 
XMO* Ilcient rejected, busy 

Modifiers: 

X»80* Response Messages go to local RSCS operator 
X*00* Response nessages go to specified link. 

FiBctioB code: X'11» 

Response Codes: 

X»00» Il«»eBt accepted for processing 
XMO» lleaent rejected, busy 

Hodifiers: 

X'SO' Response messages go to local RSCS operator 

X*HO' Purge all files enqueued on the specified link 

X'OG* Purge only specified files, response lessages go to specified link 
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COMMAND ALERT ELEMENT FORMAT A2 

EDILT BY: DMTCMX 

fONCTION: Execute AXS command 

DESCRIPTION: This ALERT element is passed via ALERT to the AXS task (DBTAXS) to request 
second- level processing of CHANGE commands. 



I Length | Function | Response | 

I (X»33M I Code: X'20» | Code | Modifiers 



linkid 



C 
10 
14 

1C 



spoolid 



I priority 



HOLD I CLASS 



I COPY 



Distribution Cede 



f ilename/f iletype, dsname 



OPERATIONAL NOTES 

The linkid field specifies the link on which the ohject inactive file is enqueued. The 
spoolid field is a binary halfword and specifies the object file's VM/370 RSCS 
identifier. 

The following fields are specified only when the corresponding file attribute is to be 
changed. If the field is not specified- it is set to all 1 bits (X'FF-=s')e 

• Priority halfword contains binary priority 0-S9 

• HOLD has the following: X'7F» — set hold status (HOLD) 

X»3F» — reset hold status (NOHOLD) 

• CLASS 1-byte EBCDIC class, A-Z, 0-9 

• COPY halfword binary copy count, 1-99 

• Distribution code 8-byte EBCDIC spool file distribution code 

• Filename/f iletype, dsname, 24-byte EBCDIC spool file filename or filetype or dsname 

The meanings of the other fields follow. 



CHANGE Command 



Function Code: x'20' 

Response Codes: 

X'OO' Element accepted for processing 
X'10' Element rejected, busy 

Modifiers: 

X'80* Response messages go to local RSCS operator 
X'OO' Response messages go to specified link 
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COMMAND ALERT ELEMENT FORMAT LO 

EDILT BY: DMTCMX 

FUNCTION: Execute a line driver command 

DESCRIPTION: This ALERT element is passed via ALERT to a line driver task (DMTNFT, 
DMTSHL) to request second-level processing of START, DRAIN, FREE, HOLD, and 
TRACE commands. 



I Function I 
Length I Code: X»80,X'81»,| Response 
(X»OB«) I X»82',X«83»,X«8t»» I Code 



I Modifiers 



locid 



OPERATIONAL NOTES 



The locid specifies the location that is to receive response messages, 
the other fields follow. 



The meanings of 



START Command 



Function Code: X»80« 

Response Codes: 

X»00' Element accepted for processing 
X'10' Element rejected, busy 

Modifiers: 

X'80* Start updated classes 
X»00» Reset DRAIN status 



DRAIN Command 



Function Code: X«81« 

Response Codes: 

X'OO* Element accepted for processing 
X'10' Element rejected, busy 

Modifiers: Onused 
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F6EE Comoand 



Function Code: X*82* 



Response Codes: 

X'OO' Element accepted for processing 
XMO» Element rejected, busy 

Modifiers: Onused 



BOLD Command 



Function Code: X'83« 

Response Codes: 

X'OO* Element accepted for processing 
XMO' Element rejected, busy 

Modifiers: 

X«80' HOLD Immediate 

X'00» HOLD after file processing 



TRACE Command 



Function Code: X'84» 

Response Codes: 

X'OO' Element accepted for processing 
XMO* Element rejected, busy 

Modifiers: 

X'CO» TRACE end 

X«80' TRACE errors 

X'OO' TRACE all 
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COMMAND ALERT ELEMENT FORMAT Lj 

BDILT BY: DHTCMX 

FUNCTION: Execute a line driver command 

EESCRIPTION: This ALERT element is passed via ALERT to a line driver task (DMTNFT, 
DMTSML) to request second-level processing of BACKSEAC and FWDSPACE 
commands. 



Length | Function I Response | 

(X'OF») I Code: X»90»,X'91» | Code I Modifiers 



locid 



Count 



OPERATIONAL NOTES 

The locid specifies the location that is to receive response messages. The count field is 
a binary fullword, and specifies the number of units to be backspaced or f orwardspaced. 
The meanings of the other fields follow. 



EACKSPAC Command 



Function Code: x'90' 

Response Codes: 

X'OO' Element accepted for processing 
XMO' Element rejected, busy 

Modifiers: 

X'80* Backspace count 

X'OO* Backspace file (restart) 



FWDSPACE Command 



Function Code: X'91' 

Response Codes: 

X*00' Element accepted for processing 
XMO* Element rejected, busy 

Modifiers: Unused 
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COHMAK^ ALERT ELEMENT FORMAT L2 

EOILT BY: DMTCMX 

FONCTION: Execute a line driver command 

DESCRIPTIONS This ALERT element is passed via ALERT to a line driver task (DHTSIT, 
DMTSML) to request second-level processing of FLDSH coimaads. 



I Length I Function I Response I 

I (X'OD«) I Code: X»AO» | Code | Modifiers 



4 I 



I 
C I 



I Spoolid 
I 



OPERATIONAL NOTES 

The locid specifies the location that is to receive response messages. The speolii field 
is a binary halfwcrd, and specifies the VM/370 SSCS identifier of the active file to b« 
flushed. The meanings of the other fields folloM. 



FLDSH Command 



Function Code: x»AO» 

Response Codes: 

X'00» Element accepted for processing 
X'10' Element rejected, busy 

Modifiers: 

X»80« Flush all copies, purge file 

X*40* Flush hold, keep file, do not decrement copy count 

X'OO' Flush, decrement copy count, purge file if no copy count remaias 
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COMMAND ALERT ELEMENT FORMAT L3 (ALSO MESSAGE AL|RT ELEHEHT) 

BDILT BY: DMTCMX, DMTMGX 

rONCTION: Execute a line driver command 

EESCRIPTION: This ALERT element is passed via ALERT to a line driver task (DMTNPT, 
DMTSML) to forward messages, and to request second-level pi^ocessing of CBE 
commands. 



i Length I Function | Response | I 

I (n-1) I Code: X«B0«,X»B1' I Code | Modifiers | 



*♦ I 



locid 



Message/Command Text 



OPERATIONAL NOTES 

The locid specifies the location that is to receive the message or command text. The 
meanings of the other fields follow. 



CMD Command e 



Function Code: x*BO* 

Response Codes: 

X'OO' Element accepted for processing 
XMO' Element rejected, busy 

Modifiers: None 



MSG Command 



Function Code: X'Bl' 

Response Codes: 

X'OO' Element accepted for processing 
X'10» Element rejected, busy 

Modifiers: One-byte binary RSCS severity code 
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COMMAND REDDEST ELEMENT 

BDILT BY: DMTNPT, DHTSML 

FUNCTION: Execute an RSCS operator command 

EESCRIPTION: This request element is passed by a line driver via GI?S/T1KE to the EEX 
task in response to a command entry at a remote station. 



Length I Function | 
(n-1) i Code: X»00» | 



Unused 



RSCS Operator 
Command Line Text 



OPERATIONAL NOTES 



No response text is returned. Command responses are distributed via DHTMGX. 
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Ilhl RJ251ST ELEMENT 

BOILT BY: DHTNPT, DMTSML 

FUNCTION: Initiates or terminates processing of an input or output file. 

EESCRIPTION: This request element is passed via GIVE/TAKE to the AXS task by line 
drivers to effect local spool file access during communications with a 
remote station. 



Length IFunction Code: | Unused I Modifiers 
(XM3») I X»01«, X»02',| I 

I X» 11», X»12» I 1 



TAG Address 



I/O Area Address 



linkid 



OPERATIONAL NOTES 

The use and meaning of the various fields depends on the requested function, as described 
telow. Certain fields may be updated during request processing. The (updated) file 
request element is returned to the requestor as a GIVE response. The meanings of the 
other fields follow. 



0£en In£ut 

Function Code: x'01' 

Modifiers: Unused 

Tag Address: Response field that points to the opened file's active TAG in DMTSYS 

I/O Area Address: Response field that points to a virtual page buffer containing the 
opened file's first VM/370 spool data buffer. 

linkid: Request field that specifies the requesting line driver's linkid. 

Response Post Codes: 

X'08' Terminal system error 

X'04» No file available 

X'02' Undefined linkid 

X'01» Previously open file returned 
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Ol^JS Output 

Function Code: X'11* 

Modifiers: X'80« Do not return possible previously opened file 

Tag Address: Request field which points to a prototype file TAG for the output file, 
constructed by the calling line dri"ver. 

I/O Area Address: Response field which points to a virtual page buffer containing an I/O 
table, a write CCU, and a buffer for processing the output file. 

linkid: Request field which specifies the requesting line driver's linkid. 

Response post Codes: 

X*OU' Error, file not opened 

X'02' Dndefined linkid 

X'01' previously open file returned 



Close Input 

Function code: x«02« 

Modifiers: 

X'80' Do not purge copy or file 

X*40' Purge all copies, and purge file 

Tag Address: Request field which points to the file's active TAG in EMTSYS, as supplied 
by open input. 

I/O Area Address: Unused 

linkid: Unused 

Response Post Codes: 

X'04' TAG not found, close failed 



Close Output 

Function Code: X'12' 

Modifiers: Unused 

Tag Address: Request field which points to a prototype file TAG for the output file, 
constructed by the calling line driver. This TAG is used to update the paraneters 
to be set for the output file. 

I/O Area Address: Request field which points to the file's I/C area, as supplied by open 
output. 

linkid: Unused 

Response Post Codes: 

X'04' I/O area not found, close failed 
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LIM ilfJST ELEMENT 

EOILT BY: DMTCMX 

FDNCTION: Request line port allocation 

DESCRIPTION: This ALERT element is passed via iLERT to the LAX task (DHTLAX) to verify 
and reserve line ports for links being activated in response to a START 
comiBand. 



r 


Length | Function I Response 
(X'OFM 1 Code: X'01»| Code 


1 Dnused 

1 




Line Address 1 

1 


Dnused 




linkid 





OPERATIONAL NOTES 

Certain fields are updated during processing. The meanings of the fields follow. 

Response Codesi 

X'08' Specified line address not attached (CC=3J 
X'OU' Specified line address not BSC port device type 
X'02» Line not available 

Line Address: Request field specifying requested line address. Zero specification 
implies request for allocation of a switchable line from the port table. If 
successful, the port's line address is returned in this field as a response. 

linkid: Response field specifying the ID of the link that has reserved the particular 
requested line address (with response code X»02*) . 
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MESSAGE REDDEST ELEMENT 

BDILT BY: DMTREX, DHTCMX, DHTAXS, DMTNPT, BHISHL 

FONCTION: Issue an SSCS message 

EESCRIPTION: This request elenent is passed via GIVE/TAKE to the HEX task, to specify 
the construction and distribution of an RSCS message (ty DMTHGX) . 



Length | Function I Routing I Severity 
(n-1) I Code: X»02» | Code | Code 



Recexver xCv^xu 



Receiver userid 



14 



18 



1C 



Issuing Module Code 



I Action 
I Code 



Binary Message Number 



Dnused 



8-byte Variable Substitution 
Values for Message Text 



OPERATIONAL NOTES 

The routing cede and severity code from the message definition (in DHTMSG) are used when 
not supplied in the message request element. If the message is not defined in DKTMSG- it 
is constructed using the specifications in the message request element, and the "variable 
substitution values" become the message text, unmodified - 

Routing codes: 

X'80» Local RSCS console 
X'40' Remote addressee 
X'20» Local user 
X'10» Local VM/370 operator 

No response text is returned. 
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PORT TABLE 

BDILT BY: Assembly of DMTSYS at RSCS generation 

FUNCTION: Record allocation status of switchable line ports available to RSCS 

DESCRIPTION: The first doubleword of the table is reserved for control information. 
Each following halfword contains the virtual device address of a line pert 
which may be dialed, and which is available to RSCS. 



r 

1 Number of 


Line Port Entries 
in Table 






1 Virtual Line Address 




1 Virtual Line 

1 


Address 


1 Yirtual Line Address 




1 Virtual Line 

1 


Address 






1 





10 



I 

I virtual Line Address 
I 



I Virtual Line Address 
I 



OPERATIONAL NOTES 

The line pert entries are marked "in use" by setting the high-order four bits of the 
entries to 1's. 
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IJMI51TE REfiOEST ELEMENT 

BUILT BY: DMTNPT, DHTSML 

FUNCTION: Teriinate line driver task 

EESCHIPTION: This request eleaent is passed via GIVE/TAKE to the BEX task, to terminate 
line driver operation in response to a ERfilN command. 



I 



Length 

I (1) 

I 



I Function 
I Code: X»03» 



OPERATIONAL NOTES 

There are no error conditions for the terminate function, so no response is made. 
However, line driver tasks must issue a WAIT request following a call to GIVE for 
terminate, because REX may not execute the request immediately. 
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Appendix D. CMS Equate Symbols 



This Appendix contains Assembler language equate symbols used in CHS to 
reference data for: 

• CMS usage 

• CMS registers 
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CMS OSAGE EQDATES 



Field 
Name 



Field Description, Contents, Heaning 



Bits defined in the Prograii Status Wo rd (PSW) 



CHANO 
CHAN1 
CHAN2 
CHAN3 
CBAN4 
CHAB5 
CBANH 
EXTM 

ECMM 
MCKM 
RAIT 
PROB 

FOFM 
BOFH 
EDFM 
SIGM 



EQO 
EQD 
EQO 
EQD 
EQO 
EQD 
EQD 
EQO 

EQD 
EQD 
EQD 
EQD 



EQD X 

EQD X 

EQD X 

EQD X 



ATTN 

SM 

CDE 

BDSY 

CE 

DE 

DC 

DE 

PCI 
ICL 
PGC 
PTC 
CEC 
CCC 
ICC 
CBC 



EQD 
EQD 
EQD 
EQD 
EQD 
EQD 
EQD 
EQD 

EQD 
EQD 
EQD 
EQD 
EQD 
EQD 
EQD 
EQD 



80' 
40' 
20' 
10* 
08' 
04' 
02' 
01' 

08' 
04' 
02' 
01' 

08' 
04' 
02* 
01' 



Bit 


00 - 


channel lask 


Bit 


01 - 


channel 1 aask 


Bit 


02 - 


channel 2 laask 


Bit 


03 - 


channel 3 eask 


Bit 


04 - 


channel 4 aask 


Bit 


05 - 


channel 5 lask 


Bit 


06 - 


input/output aask 


Bit 


07 - 


external mask 



Bit 12 - extended control lOde mask 

Bit 13 - machine check mask 

Bit 14 - wait state aask 

Bit 15 - problem state mask 

Bit 36 - fixed-point overflow mask 
Bit 37 - decimal overflow mask 
Bit 38 - exponent underflow mask 
Bit 39 - significance mask 



His defined in the Channel Status Word (CSW) 



80" 
40' 
20' 
10' 
08' 
04' 
02' 
01' 

80' 
40' 
20' 
10' 
08' 
04' 
02' 
01' 



Common Channel Command Codes 
WHITE EQD ~ X'01' 



READ 

NOP 

SENSE 

WRDATA 

REDATA 

SEEK 

TIC 

WHITE1 

RECONS 

SETSEC 

SEARCH 



EQO 
EQD 
EQO 
EQD 
EQD 
EQO 
EQD 
EQD 
EQD 
EQO 
EQD 



X'02' 
X'03' 
X'04' 
X'05' 
X'06' 
X'07' 
X'08' 
X'09' 
X'OA' 
X'23' 
X'31' 



Bit 32 - attention 

Bit 33 - status modifier 

Bit 34 - control unit end 

Bit 35 - busy 

Bit 36 - channel end 

Bit 37 - device end 

Bit 38 - unit check 

Bit 39 - unit exception 

Bit 40 - program-controlled interrupt 

Bit 41 - incorrect length 

Bit 42 - program check 

Bit 43 - protection check 

Bit 44 - channel data check 

Bit 45 - channel control check 

Bit 46 - interface control check 

Bit 47 - chaining check 



Write 

Read 

No operation 

Sense 

Write data 

Read data 

Seek 

Transfer in channel 

Write and space 1 

Read from console 

Set sector 

Search ID equal 



B its defined in a Channel Command Word (CCW) 



CE 

CC 

SILI 

SKIP 

PCIF 

IDA 



EQD 
EQD 
EQD 
EQO 
EQD 
EQD 



X'80' 
X'40' 
X'20' 
X'10' 
X'08' 
X'04' 



Bit 32 - chain data 

Bit 33 - command chain 

Bit 34 - suppress incorrect length 

Bit 35 - suppress data transfer 

Bit 36 - cause program control interrupt 

Bit 37 - indirect data address 
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CHS REGISTER EQDATES 

Field Description, Contents, Meaning 



Field 






Name 






General 


jEurfcse r 


RO 


EQD 





R1 


EQD 


1 


R2 


EQD 


2 


R3 


EQD 


3 


R4 


EQD 


4 


R5 


EQD 


5 


R6 


EQD 


6 


R7 


EQD 


7 


R8 


EQD 


8 


R9 


EQD 


9 


R10 


EQD 


10 


B11 


EQD 


11 


R12 


EQD 


12 


R13 


EQD 


13 


RIU 


EQD 


14 


R15 


EQD 


15 



Fl oat inq-Eoint rggisters 
FO EQD 
F2 EQD 2 
F4 EQD 4 
F6 EQD 6 

Extendgd control registers 



CO 


EQD 





CI 


EQD 


1 


C2 


EQD 


2 


C3 


EQD 


3 


C4 


EQD 


4 


C5 


EQD 


5 


C6 


EQD 


6 


C7 


EQD 


7 


C8 


EQD 


8 


C9 


EQD 


9 


CIO 


EQD 


10 


C11 


EQD 


11 


C12 


EQD 


12 


C13 


EQD 


13 


C14 


EQD 


14 


C15 


EQD 


15 
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Appendix E. Data Areas and Control Block References 



This appendix — a listing of CP, CHS, and RSCS control blocks — contains the 
following: 

• Module references to data areas and control blocks. 

• Information on how certain data areas or control blocks are created and 
released. 
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CP CONTROL BLOCK REFERENCES 



aCCTBLOK 

Built bi: DMKHTD 

Released b^: DMKHVD, DMKOSO 

Referenced bj: DMKACO, DMKCKP, DHKHVD, 
DMKSPL 



CCHREC 

Built b^: DHKCCH 

Released bjr: DMKCCH, DMKIOE, DMKIOF 

Referenced b^: DHKCCH, DMKEIG, DMKSEV, 
DMKSIX 



ACNTBLOK 

Built bi: DMKACO, DHKHVD, DKKWRM 

Released bj: DMKACO 

Ref erenced bj: DMKACO, DMKCKP, DHKHVD, 
DMKJRL, DMKRSE, DMKRRM 



CCPARM 

Built b]r: DBKNLD, DMKSNC 
Released bj: DMKNLD, DMKSNC 
Referenced b^: DMKNLD, DMKSNC 



ALOCBLOK 

Built bi: DMKCPI, DMKVDC 

Released b:^: DMKCPI, DMKVDC 

Referenced b^: DMKCPI, DMKMON, DMKPGT, 
DMKTDK, DMKVDC 



CHXBLOK 

Built bi: DMKDIA 

Released by; DMKVCA 

Referenced bj[: DMKCFP, DMKCQG, DMKDIA, 
DMKVCA, DMKVSI 



BSCBLOK 

Built b^: DMKRGB 

Relea s ed b^: DMKRGA 

Referenced b^: DMKBSC, DMKRGA, DMKRGB 



CHYBLOK 

Built b^: DMKDIA 
Rel eas ed b^: DMKVCA 
Referenced bj: DMKDIA, DMKVCA 



BUFFER 



Built b^: DMKCFM, DMKCPI, DMKERM, 

DMKGRF, DMKLNK, DMKLOG, DMKRGA, DMKRSP 

Released b^: DMKCFM, DMKCPI, DMKGRF, 
DMKLNK, DMKRGA, DMKRSP 

Referenced b^: DMKALG, DMKCDM, DMKCFG, 
DMKCFM, DMKCFO, DMKCFS, DMKCPI, DMKCPS, 
DMKCSB, DMKCSO, DMKCSP, DMKCSQ, DMKCST, 
DMKCSD, DMKCSV, DMKEMA, DMKERM, DMKGRF, 
DMKGRT, DMKLNK, DMKMSG, DMKNMT, DMKRGA, 
DMKRND, DMKRSP, DMKSCN, DMKUDU, DMKVDC, 
DMKWRM 



CKPBLOK 

Built b^: DMKRNH 
Released bj: DMKRNH 
Referenced bj: DMKRNH, DMKWRM 

CONTASK 

Built bi: DMKCNS, DMKGRF, DMKQCN, 
DMKRGA, DMKRGB, DMKRNH 

Rele as ed bj: N/A 

Referenced bj : DMKCNS, DMKGRF, DMKMON, 
DMKNES, DMKQCN, DMKRGA, DMKRGB, DMKRNH 
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CORTABLE 



Assembled in DMKSYS. 



Rel eased b^: N/A 



Referenced bj: DHKACO, DKKATS, DMKBLD, 



DMKCCW, DMKCDS, DMKCFO, 
DHKCPV, DMKDGD, DMKDMP, 
DMKMCH, DMKMNI, DMKPAG, 
DMKPTR, DMKRPA, DMKDDR, 
DMKVMA 



DMKCPI, DMKCPD, 

DMKFRE, DMKMCC, 

DMKPGS, DMKPSA, 

DMKDDD, DHKDNT, 



CPEXBLOK 

Built bjr 

DMKACO, 

DMKDIA, 

DMKIOS, 

DMKPGT, 

DMKRNH, 

DMKOSO, 

DMKVMC 



DMKCDS, 
DMKGRF, 
DMKLOC, 
DMKPTR, 
DMKRPA, 
DMKVCA, 



DMKCrM, 
DHKIOE, 
DMKMCC, 
DMKQCN, 
DMKRSP, 
DMK?DC, 



DMKCPS, 
DMKIOF, 
DMKMCH, 
DMKRGA, 
DMKSPL, 
DMKVDE, 



DMKCP7, 
DMKIOG, 
DMKMON, 
DMKRGB, 
DMKSVC, 
DMKVMA, 



Rel ejasgd bj: DMKCPS, 
DMKMON, DMKPTR 

Referenced bj: DMKACO, 
DMKCDS, DMKCFM, DMKCFO, 
DMKCPB, DMKCPS, DMKCPO, 
DMKDIA, DMKDSB, DMKDSP, 
DMKGIO, DMKGRF, DMKIOE, 
DMKLNK, DMKLOC, DMKMCC, 
DMKMCT, DMKMIA, DMKMID, 
DMKPAG, DMKPGS- DMKPGT, 
DMKPSA, DMKPTR, DMKQCN, 
DMKRNH, DMKRPA, DMKRSP, 
DMKSTK, DMKSVC, DMKTAP, 
DMKONT, DMKOSO, DMKVAT, 
DMKVDC, DMKVDE, DMKVMA, 
DMKVSP 



DDRHEC 

Bailt bi: DMKVER 
Rele ase d bj;: DMKVER 
Refe ren ced bj: DMKVER 

DMPINREC 

Milt, fei: DMKDMP 
Released b^: DMKDMP 
Referenced bj: DMKDMP 



DMKDSP, DMKIOF, 



DMKALG, 
DMKCFP, 
DMKCPV, 
DMKEXT, 
DMKIOF, 
DMKMCD, 
DMKMNI, 
DMKPRG- 
DMKRGA, 
DMKSPL, 
DMKTMR, 
DMKVCA, 
DMKVMC, 



DMKCCW, 
DMKCNS, 
DMKDGD, 
DMKFRE, 
DMKIOS, 
DMKMCH, 
DMKMON, 
DMKPRV, 
DMKRGB, 
DMKSSS, 
DMKTRD, 
DMKVDA, 
DMKVSI, 



DMPKYREC 

Built bi: DMKDMP 
Released b^: DMKDMP 
Referenced b^: DMKDMP 

DMPTBREC 

Iliili hi' DMKDMP 
Released b^: DMKDMP 
Referenced bj: DMKDMP 

ECBLOK 

Built bi: DMKBLD 

Released bjr: DMKCFO, DMKCFS, DMKOSO 

Referenced bj: DMKBLD, DMKCDB, DHKCDM, 

DMKCDS, DMKCFG, DMKCFH, DMKCFP, DMKCFS, 

DMKDSP, DMKEXT, DMKPRG, DMKPRV, DMKSCH, 

DMKSVC, DMKTMR, DMKTRC, DMKTRD, DMKOSO, 
DMKVAT, DMKVMC 

ERRBLOK 

MLk%. hi' DMKIOE 
Released bj: DMKIOF 
Referenced bj: DMKIOE, DMKIOF 

lOBLOK 



Built bj: DMKACO, DMKCCW, 

DMKCNS, DMKCPB, DMKCPI, DMKCPS, 

DMKCSP, DMKCSO, DMKDGD, DMKDIA, 

DMKGRF, DMKHVC, DMKIOS, DMKNLD, 

DMKRGB, DMKSPL, DMKTDK, DMKVCA, 

DHKVDD, DMKVDE, DMKVDR, DMKVIO 

Released b^: DMKCFP, DMKCNS, 

DMKCPI, DMKCPS, DMKCSO, DMKDAS, 

DMKDIA, DMKGIO, DMKGRF, DMKHVC, 

DMKMON, DMKNLD, DMKPAG, DMKRGA, 

DMKRNH, DMKRSP, DHKSEP, DMKTDK, 

DMKVDC, DMKVDD, DMKVDE, DMKVIO 

Referenced bj: DMKACO, DMKBSC, 

DMKCCW, DMKCFP, DMKCNS, DMKCPB, 

DMKCPS, DMKCSB, DMKCSO, DMKCSP, 

DMKCSV, DMKDAS, DMKDGD, DMKDIA, 

DMKDSB, DMKDSP, DMKGIO, DMKGRF, 

DMKIOE, DMKIOG, DMKIOS, DMKISM, 

DMKMCC, DMKMNI, DMKMON, DMKMSW, 

DMKNLE, DMKPAG, DMKPGT, DMKRGA, 



DMKCFP, 
DMKCSO, 
DMKGIO, 
DMKRGA, 
DMKVDC, 



DMKCPB, 
DMKDGD, 
DMKIOS, 
DMKRGB, 
DMKVCA, 



DMKCCH, 
DMKCPI, 
DMKCSO, 
DMKDIB, 
DMKHVC, 
DMKLOG, 
DMKNLD, 
DMKRGB, 
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DHKRNH, DMKRSE, DMKRSP, 

DHKSSS, DMKSTK, DMKTAP, 

DMKTRC, DMKTRD, DMKTRK, 

DMKUSO, DMKVCA, DMKYDC, 

DMKVDR, DMKVIO, DMKVSI 



DMKSEP, DHKSPL, 

DHKTCS, DHKTDK, 

DMKODR, DHKONT, 

DHKVDD, DMKVDE, 



lOERBLOK 

Built bi: DMKBSC, DMKCCH, DHKDAS, 

DMKDIA, DMKDIB, DMKIOE, DMKIOS, DMKRSE, 
DMKTAP, DMKVCA 

Released bj;: DMKBSC, DMKCCH, DMKCCW, 

DMKCFP, DMKCNS, DMKCPS, DMKDAS, DMKDGD, 

DMKDIA, DMKDIB, DMKGIO, DMKGRF, DMKIOE, 

DMKIOS, DMKMON, DMKNLD, DMKRGA, DHKRGB, 

DMKRNH, DMKRSE, DMKRSR, DMKTAP, DMK7I0 

Referenced b^: DMKBSC, DMKCCH, DMKCCW, 

DMKCFP, DMKCHS, DMKCPS, DMKDAS, DMKDGD, 

DMKDIA, DMKDIB, DMKDSB, DMKEIG, DMKGIO, 

DMKGRF, DMKIOE, DMKIOF, DMKIOS, DMKMSW, 

DMKNLD, DMKNLE, DMKRGA, DMK8GB, DMKRNH, 

DMKRSE, DMKRSP, DMKSEV, DMKSIX, DMKTAP, 

DMKTRK, DMKONT, DMKVCA, DMKVDC, DMKVDE, 
DMKVIO, DMKVSI 



MCRECORD 

iaiil hi' DMKKCH 
Released by : N/A 
Referenced bj: DHKMCH 

MDRREC 

Built bjr: DMKVER 
Released by: DMKVER 
Referenc ed bj: DMKIOF, DMKVER 

MICBLOK 

Buili hi' DMKCFS, DHKLGG 

Released bjr: DMKCFS, DMKLOG, OMKUSO 

Referenced b^: DMKELD, DMKCFS, DMKDSP, 
DMKLOG, DMKKCH, DMKPTB, DHKRPA, DMKTRA 



IRMBLOK 

Built bl: DHKCFO, DMKCFS 
Released b^: DMKCFS, DMKIOE 
Referenced bi: DMKCFO, DMKIOE 



HIHREC 

Built by: DHKVER 
Released bj: DMKVER 
Referenced bj: DMKVER 



JPSCBLOK 

Assembled as part of DMKSYS 

Referenced bi: DMKALG, DMKJRL, DMKLNK, 
DMKLOG 



MNDEVLST 

Built bi: DMKENT 
Released bj[: DMKENT 
Referenced bj: DMKENT 



LOCKBLOK 

Built bx: DMKLOC 
Released bj: DMKLOC 
Referenced bj: DMKLOC 



MNHDR 

Built bjr: DMKMON 
Released b^: DMKMON 
Referenced b^: DMKMON 



MCHAREA 

Built bx: DMKIOG 

Released bj: N/A 

Referenced b^: DMKCCH, DMKCFO, DMKCPD, 
DMKIOG, DMKMCH, DMKMCT 



MNOOO 

Built b^: DMKMON 
Released b^: DMKMON 
Referenced b]r: DMKMON 
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MN001 

Built hy_: DM K HON 
Released bj: DMKHON 
Referenced bi: DM KM ON 

MN097 

Built bi: DMKMNI 
Released by: DMKMON 
Referenced bj: DMKHNI 

MN098 

Built hZi DMKHNI 
Released b^: DMKMON 
8§f§£esced bj: DMKMNI 

KN099 

Built bi: DMKMON 
Released bj: DMKMON 
I§f§£§IiS6^ hi- DMKMON 

MN10X 

Built bv: DMKMON 
Released b^: DMKMON 
Refergnced b^: DMKMON 

MN20X 

Built bx: DMKMON 
Released bj: DMKMON 
Referenced bjr: DMKMON 

MN400 

Built bi: DMKMON 
Released b^: DMKMON 
Referenced b^: DMKMON 



MN500 

Built b^: DMKMON 
Released bj[: DMKMON 
Referenced bj: DMKMON 

MN600 

Built bj: DMKMON, DMKMNI 
Released bjj: DMKMON 
Referenced bjr: DMKMNI, DMKMON 

MN602 

Built bj: DMKENT 
Released bi: DMKENT 
Referenced bj: DMKENT 

MN700 

Built hi: DMKMON 
Released by: DMKMON 
lefe^esced by: DHKMOH 

MN802 

Built by: DMKMON 
Released by: DMKMON 
Referenced by: DMKMON 

HONCOM 

liiilt by: DMKHCC 

Released by: DMKMON 

Referenced by: DMKCPS, DMKDMP, DMKENT, 
DMKMCC, DMKMCD, DMKMIA, DMKMNI, DMKMON 

MSSCOM 

Built by: DMKSSS 

Released by: DMKLNK, DMKLOG, DMKSSS, 
DMKVDA 

Referenced by: DMKCPE, DMKDGD, DMKDSB, 
DMKLNK, DMKLOG, DMKMSS, DMKSSS, DMKVDA, 
DMKVSI 
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NCPTBL 

Built bi: DMKSNT 
Released bj: N/A 
leferesced bj: DMKNLD, DMKSNC 



PAGTABLE 

Built bj[: DMKBLD 

Released b^: DMKBLD, DHKPGS 

Referenced b;j: DHKATS, DMKBLD, DMKCFG, 
DMKCPD, DMKPGS, DMKPTR, DMKVAT, DMKVMA 



NICBLOK 

Built b2: DMKNLD 

Released bj: DMKNLD 

Referenced bi: DHKACO, DMKBLD, DMKCFT, 

DMKCKP, DMKCPI, DMKCQR, DMKDIA, DMKHVD, 

DMKLOG, DMKNES, DMKNET, DMKNLD, DMKPSA, 

DMKQCN, DMKRGA, DMKRGB, DMKRNH, DMKWRM 



NPRTBL 

Built bi: DMKSNT 

Released b^: N/A 

Referenced bj.: DMKCKS, DMKCSO, DMKHVD, 
DMKTCS, DMKHRM 



OBRRECN (Long OBR) 
Built bi: DMKIOF 
Released bj;: DMKIOF 
Ref erenced b][: DMKIOC, DMKIOF, DMKVER 

OBRREC (Short OBR) 
Built bi: DMKIOF 
Released bj: DMKIOF 
Referenced bj: DMKIOF 

OWNDLIST 

Assembled into DMKSYS 

Referenced bj: DMKATS, DMKCKP, DMKCKS, 

DMKCPI, DMKCPO, DMKDRD, DMKPAG, DMKPGS, 

DMKPGT, DMKPTR, DMKSPL, DMKUDR, DMKVDA, 
DMKVDC, DMKWRM 



PGBLOK 

Built bx: DHKVAT 

Released bj: DMKCFP, DHKDSP 

Referenced bj: DBKCFP, DMKDSP, DMKVAT 



PSA 



Assembled as part of DMKSYS; part of CP 
nucleus. 



R efere n ced bj: 
DMKATS, DMKBLD 



DMKCDB 
DMKCFG 
DMKCFS 
DMKCNS 
DMKCPV 
DMKCQY 
DMKCST 
DMKDEF 
DMKDRD 
DMKERM 
DMKGRF 
DMKIOE 
DMKJRL 
DHKLOK 
DMKMIA 
DMKMSW 
DMKOPR 
DMKPRV 
DMKRGB 
DMKSAV 
DMKSIX 
DMKSTK 
DMKTHI 
DMKTRK 
DMKDSO 
DMKVDA 
DMKVDS 
DMKVMI 



DHKCDM 
DMKCFH 
DMKCFT 
DMKCPB 
DMI^COG 
DMKCSB 
DMKCSO 
DMKDGD 
DHKDSB 
DMKEXT 
DMKGRT 
DMKIOF 
DMKLNK 
DMKMCC 
DHKMID 
DMKNES 
DMKPAG 
DMKPSA 
DMKRNH 
DMKSCH 
DMKSNC 
DMKSVC 
DMKTMR 
DMKTRM 
DMKVAT 
DMKVDC 
DMKVER 
DMKVSI 



DMKACO 
DMKBSC 
DMKCDS 
DMKCFH 
DMKCKF 
DMKCPI 
DMKCQH 
DMKCSO 
DMKCSV 
DMKDIA 
DMKDSP 
DMKFMT 
DMKHVC 
DMKIOG 
DMKLOC 
DMKMCD 
DMKMNI 
DMKNET 
DMKPGS 
DMKPTR 
DMKRPA 
DMKSCN 
DMKSPL 
DMKTAP 
DMKTRA 
DMKDDR 
DMKVCA 
DMKVDD 
DMKVIO 
DMKVSP 



PWDIBLOK 

Built bjr: DMKJRL 
Released bj: DMKJRL 
Referenced bj: DMKJRL 



DHKALG, 
DMKCCH 
DMKCFC 
DMKCFO 
DMKCKS 
DMKCPS 
DMKCQP 
DHKCSP 
DMKCVT 
DMKDIB 
DMKEIG 
DMKFRE 
DMKHVD 
DMKIOS 
DMKLOG 
DMKMCH 
DMKMON 
DMKNLD 
DMKPGT 
DMKQCN 
DMKRSE 
DMKSEP 
DMKSSP 
DMKTCS 
DMKTRC 
DMKODU 
DMKVCH 
DMKVDE 
DMKVMA 

DMKVSQ, 



DMKAPI, 
DHKCCW, 
DMKCFD, 
DMKCFP, 
DHKCLK, 
DMKCPO, 
DMKCQR, 
DMKCSQ, 
DMKDAS, 
DMKDMP, 
DMKENT, 
DMKGIO, 
DMKIOC, 
DMKISM, 
DMKLOH, 
DMKMCT, 
DMKMSG, 
DMKNLE, 
DMKPRG, 
DMKRGA, 
DMKRSP, 
DMKSEV, 
DMKSSS, 
DMKTDK, 
DMKTRD, 
DMKONT, 
DMKVCN, 
DMKVDR, 
DMKVMC, 
DMKHRM 
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RCHBLOK 

Assembled into CP nucleus module DMKRIO 

Released b^: N/A 

Referenced bv: DMKCCH, DHKCFO, DHKCKP, 

DMKCPB, DHKCPI, DMKCPS, DMKCPV, DHKCQP, 

DMKDIA, DMKDSB, DMKENT, DMKIOG, DMKIOS, 

DMKMNI, DMKMON, DMKNES, DHKPRY, DMKSCN, 

DMKSSP, DMKSSS, DMKVCH, DMKVMT 



RECBLOK 



lailt bi: DMKCKS, DMKCPI, 
DHKRSP, DHKVSP, DHKWRM 



DMKPGT, 



Released b^: DMKPGT, DHKSPL, DHKUSO 

Referenced bj: DMKCKP, DMKCKS, DMKCPI, 
DMKDHP, DHKPGT, DHKRSP, DHKSPL, DHKVSP, 
DHKHRH 



RCUBLOK 



Assembled into CP nucleus module DHKRIO. 

Released bj- N/A 

Referenced bj: DMKCCH, DMKCCW, DMKCFO, 

DHKCKP, DMKCPB, DMKCPI, DHKCPS, DMKCPV, 

DHKCQP, DMKDIA, DMKDSB, DMKENT, DMKGRF, 

DHKIOC, DMKIOS, DMKMNI, DMKMON, DMKNES, 

DMKNLD, DHKPRV, DMKSCN, DHKSSP, DHKSSS, 
DMKVCH 



RCWTASK 

Built bi: DMKCCW 

Released b^: DHKCCW, DMKUNT 

Referenced bj: DMKCCW, DMKCFP, DMKCPB, 
DMKHYC, DMKIOS, DMKISM, DMKTRD, DHKTRK, 
DHKDNT, DHKVDR 



RDEVBLOK 

Built b^: Assembled into CP nucleus 
module DMKRIO 

Released bj: N/A 

Referenced bj.: DHKACO, DHKATS, DMKBLD, 

DHKBSC, DHKCCH, DMKCCW, DMKCFC, DMKCFG, 

DMKCFH, DMKCFH, DHKCFO, DHKCFP, DHKCFT, 

DHKCKP, DHKCKS, DHKCNS, DMKCPB, DMKCPI, 

DHKCPS, DHKCPU, DHKCPV, DHKCQG, DHKCQP, 

DHKCQR, DHKCQY, DMKCSB, DHKCSO, DHKDAS, 

DMKDEF, DMKDGD, DHKDIA, DHKDMP, DMKDRD, 

DMKDSB, DMKDSP, DMKENT, DMKGRF, DMKGRT, 

DMKHVD, DHKIOC, DMKIOE, DHKIOF, DHKIOG, 

DMKIOS, DHKLNK, DHKLOG, DHKLOH, DMKMCC, 

DMKMNI, DMKHON, DMKMSW, DMKNES, DMKNET, 

DHKNLD, DHKNLE, DMKOPR, DHKPAG, DHKPGS, 

DMKPGT, DHKPRV, DHKPSA, DMKPTR, DMKQCN, 

DHKRGA, DHKRGB, DHKRNH, DMKRSE, DHKRSP, 

DMKSCN, DHKSEP, DHKSNC, DHKSPL, DHKSSP, 

DHKSSS, DMKTAP, DMKTCS, DHKTDK, DHKTRK, 

DMKTRH, DHKONT, DMKUSO, DMKVCH, DMKVCN, 

DHKVDA, DHKVDC, DHKVDD, DMKYDE, DHKVDR, 

DHKVDS, DHKVER, DHKVSI, DHKWRM 



RECPAG 

laiii hi' DMKIOF, DHKIOG 
EeleasM by: DHKIOF, DMKIOG 
Referenced bj: DHKIOF, DHKIOG 

RSPLCTL 

Buill bj: DMKRSP 

Released b;j: DMKRSP 

Referenced b]r: DMKCKP, DMKCQP, 
DMKRSP, DHKSPL, DMKTCS 

SAVEAREA 

l!lilt bj: DMKCPI, DMKSVC 



Released bj[: DMKSVC 



Refere 
DMKATS 
DMKCDB 
DSKCFG 
DMKCFS 
DMKCPB 
DMKCQH 
DMKCSO 
DMKCSV 
DMKDIA 
DMKEIG 
DMKGRF 
DMKIOF 
DHKLNK 
DHKMCH 
DMKMSG 
DHKNLD 
DHKRGA 
DMKRSP 
DHKSPL 
DMKTCS 
DMKTRD 
DMKUNT 
DHKVDA 
DMKVDS 
DHKWRM 



need bj: 
DMKBLD 
DMKCDH 
DMKCFH 
DMKCFT 
DHKCPS 
DMKCQP 
DMKCSP 
DHKDAS 
DMKDIB 
DHKENT 
DMKGRT 
DHKIOG 
DHKLOG 
DHKHIA 
DHKHSW 
DHKNLE 
DHKRGB 
DHKSET 
DHKSSP 
DHKTDK 
DHKTRK 
DHKDSO 
DHKVDC 
DHKVER 



DHKACO 
DHKBSC 
DHKCDS 
DHKCFH 
DHKCKS 
DHKCPU 
DHKCQR 
DHKCSQ 
DHKDDR 
DHKDIR 
DHKERM 
DHKHVD 
DHKIOS 
DMKLOH 
DHKMID 
DMKNEH 
DHKPGS 
DHKRNH 
DHKSEV 
DHKSSS 
DHKTHI 
DHKTRH 
DHKVAT 
DHKVDD 
DMKVMA 



DMKALG, 
DMKCCH 
DMKCFC 
DHKCFO 
DMKCLK 
DMKCPV 
DHKCQY 
DHKCST 
DHKDEF 
DHKDRD 
DHKFMT 
DHKIOC 
DHKISH 
DHKHCC 
DHKHNI 
DHKNES 
DHKPTR 
DHKRPA 
DMKSIX 
DHKSVC 
DMKTRA 
DHKUDR 
DHKVCA 
DHKVDE 
DHKVHC 



DHKCSO, 



DMKAPI, 
DMKCCW, 
DMKCFD, 
DMKCFP, 
DHKCNS, 
DHKCQG, 
DHKCSB, 
DMKCSH, 
DMKDGD, 
DMKDSB, 
DMKGIO, 
DMKIOE, 
DMKJRL, 
DMKMCD, 
DHKMON, 
DMKNET, 
DMKQCN, 
DMKRSE, 
DHKSNC, 
DMKTAP, 
DMKTRC, 
DHKUDU, 
DHKVCH, 
DHKVDR, 
DHKVSP, 
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SAVTABLE 

Assembled into CP pageable module DMKSNT 

geleased b^: N/A 

Referenced bj;: DMKCFG, DHKCFH, 

SDRBLOK 

Built bi: DMKIOF 
Released b^: DMKIOE 
Referenced bj;: DMKIOE, DMKIOF 

SEGTABLE 

Built bj: DMKBLD 

Released bj: DMKBLD 

Refer enc ed b^: DMKATS, DMKBLD, DMKPGS, 
DMKYMA 

SFBLOK 

Bttilt bi: DMKCKS, DMKHLD, DMKSPL, DMKWSM 

Released bj: DMKCKS, DMKRSP, DMKSPL, 
DMKDSO 

Referenced bi: DMKCKP, DMKGKS, DHKCPI, 

DMKCQG, DMKCQR, DHKCSO, DMKCSP, DHKCSQ, 

DHKCST, DMKCSU, DMKCS7, DMKDMP, DHKDRD, 

DMKMIA, DMKMNI, DHKNLE, DHKRSE, DMKRSP, 

DMKSEP, DMKSPL, DMKTCS, DMKOSO, DMKVSP, 
DMKVSQ, DMKHRM 

SHQBLOK 

Built bi: DMKCSP, DMKWRM 

Released b^: DMKCSP 

Referenced b^: DMKCKS, DMKCQR, DMKCSQ, 
DMKSPL, DMKWRM 

SHRTABLE 

Built bi: DMKCFG 

Released b^: DMKPGS, DMKVMA 

Referenced bi: DMKATS, DMKCFG, DMKCFH, 
DMKCPD, DMKPGS, DMKPTR, DMKYMA 



SPLINK 

Built Bj: N/A 

Released b^: N/A 

Referenced b^: DMKCKS, DMKCQH, DMKCSU, 
DMKDHD, DMKMIA, DMKRSP, DMKSPL, DMKTCS, 
DMKVSP, DMKVSQ 



SWPTABLE 

Built bjr: DMKBLD, DMKVMA 

Released b^: DMKBLD 

Referenced bj: DMKATS, DMKBLD, DMKCFG, 
DMKCPO, DMKPGS, DMKPTR, DMKVAT, DMKVMA 

SYSLOCS 

Assembled into CP nucleus module DMKSYS. 

Referenced b][: DMKACC, DMKBLD, DMKCFO, 
DMKCFT, DMKCKP, DMKLOC, DHKLOG, DHKLOH, 
DMKDDR, DMKDDD, DMKDSO 



SYSTBL 

Assembled into DMKSNT. 

Referenced bj : DMKATS, DMKCFG, DMKCFH, 
DMKCPU 



TNSREC 

Built bx: DMKIOF 
Released b^: DMKIOF 
Referenced by: DMKIOF 

TREXT 

Built by: DHKTRA 

Released hj: DMKTRA, DMKTRC, DMKDSO 

Referenced bj: DMKCFH, DMKDSP, DMKPGS, 
DMKPRG, DMKPRV, DMKSVC, DMKTMR, DMKTRA, 
DMKTRC, DMKTRD, DMKVIO 
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TRQBLOK 



7CHBL0K 



Buili hi' DMKBLD, DMKCFC, DMKCFS, 

DMKCPI, DMKGRF, DMKLOG, DMKHCC, DMKQCN, 
DHKRGA 

Seleased bi: DMKCFM, DMKCFS, BMKDIA, 

DMKMCC, DMKLOG, DMKMON, DMKQCN, DMKRGA, 
DMKUSO 

Referenced hz: DMKBLD, DMKCDS, DMKCFC, 



DHKCFM, DMKCFP, DMKCFS, 
DMKDia, DMKDSP, DMKENT, 
DMKMCC, DMKMID, DMKMNI, 
DMKQCN, DMKRGA, DMKRGB, 
DMKTMR, DMKUSO 



DMKCPI, DMKCPO, 
DMKGRF, DMKLOG, 
DMKMON, DMKPSA, 
DMKSCH, DMKSSS, 



ODBFBLOK 

Built by: DMKDEF, DMKHVD, DMKSPL 

Released b^: DMKDEF, DMKHVD, DMKSPL 

Referenced bj: DMKCFS, DMKDEF, DMKHVD, 
DHKLNK, DMKLOG, DMKSPL, DMKSSS, DMKDDR, 
DMKODU 

UDEVBLOK 

Built bi: DMKCSP, DMKUDR 

Released b^: DMKCSP, DMKDDR 

Referenced b^: DMKDEF, DMKDIR, DMKLNK, 
DMKLOG, DMKSCN, DMKDDR, DMKVDA, DMKVDS 

UDIRBLOK 

Built bi: DMKCSP 

Released b^: DMKCSP 

Referenced bi: DMKCFS, DMKCPI, DMKCSP, 
DMKDEF, DMKDIR, DMKHVD, DHKLNK, DMKLOG, 
DMKSPL, DMKUDR, DMKDDD 

DMACBLOK 

Built bi: DMKDIR 

Released b^: DMKDIP 

Refe renc ed b^: DMKCFS, DMKDEF, DMKDIR, 
DMKHVD, DMKLOG, DMKSPL, DMKDDR, DMKDDD 



Built bj: DMKVDS 

Released b;^: DMKDSO 

Referenced bv: DMKCFM, 

DMKCPB, DMKCPV, DMKCQG, 

DMKDEF, DMKDIA, DMKDSP, 

DMKLOG, DMKPRV, DMKSCN, 

DMKDSO, DMKVCH, DMKVCN, 

DMKVDD, DMKVDS, DMKVIC, 



DMKCFP. DMKCKP, 
DMKCSP, DMKCSD, 
DMKCSV, DMKLNK, 
DMKSPL, DMKSSS, 
DMKVDA, DMKVBC, 

DMKVSI, DHKVSP 



VCCNCTL 

Built bi: DMKVDS 

Released bj; DKKVDR 

Referenced bj: DMKALG, DMKCFP, DMKGRF, 
DMKRGA, DMKVCN, DMKVDH 

VCDBLOK 

Built bi: DMKVDS 

Rele as ed bj: DMKDSO 

Referenced b^: DMKCFM, DMKCFP, DMKCKP, 

DMKCPB, DMKCPV, DMKCQG, DMKCSP, DMKCSD, 

DMKCSV, DMKDEF, DMKDIA, DMKDSP, DMKLOG, 

DMKNLD, DMKPRV, DMKSCN, DMKSPL, DMKSSS, 

DMKDSO, DMKVCH, DMKVCN, DMKVDA, DMKVDC, 

DMKVDD, DMKVDS, DMKVIC, DMKVSI, DHKVSP 



VDEVBLOK 



Built b^;: DMKLOG, DMKVDS 



Released b,^: DMKDSO 



Ref ere 
DMKCCH 
DMKCKP 
DMKCQP 
DMKCSD 
DMKDIA 
DMKGRF 
DMKLOG 
DMKSCN 
DMKTRD 
DMKVCH 
DMKVDR 
DSKVSP 



need b^ : 

, DMKCFG, 

, DMKCPB, 

, DMKCSB, 

, DMKCSV, 

, DMKDIB, 

, DHKHVC, 

, DMKNLD, 

, DMKSPL, 

, DMKTRK, 

, DMKVCN, 

, DMKVDS, 

, DMKVSQ 



DMKACO, 
DMKCFH, 
DMKCPS, 
DMKCSP, 
DMKDAS, 
DMKDRD, 
DMKHVD, 
DMKPRV, 
DMKSSS, 
DMKDNT, 
DMKVDA, 
DMKVEB, 



DMKALG, 
DMKCFM, 
DMKCPV, 
DMKCSQ, 
DMKDEF, 
DMKDSP, 
DMKIOS, 
DMKQCN, 
DMKTHI, 
DMKUSO, 
DMKVDC, 
DHKVIO, 



DMKCCH, 
DMKCFP, 
DMKCQG, 
DMKCST, 
DMKDGD, 
DMKGIO, 
DMKLNK, 
DMKRGA, 
DMKTRC, 
DHKVCfi, 
DMKVDD, 
DMKVSI, 



VFCBBLOK 

Built bj: DMKCFG, DMKCSO 
Rel eas ed bj: DMKVDR 
Referenced by: DMKCSB, DMKVSP 



Appendix E. Data Areas and Control Block References 319 



VMABLOK 

Mkll hi' DMKBLD, DMKCFG 

Released b:^: DMKBLD, DMKPGS, DMKVMA 

Referenced bj: DMKATS, DHKCFG, DMKPGS, 
DMKVHA 



7MCPARM 

Built b y; Virtual machine user 
Rele as ed by; Virtual machine user 
Referenced bj: DMKVMC 



VMBLOK 



Built b^: DMKBLD 

Released b^: DMKBLD, 
DMKUSO 



Referenced by: 
DMKATS, DMKBLD 



DMKCDM 
DMKCFH 
DMKCFT 
DMKCPI 
DMKCQH 
DMKCSO 
DMKCSV 
DMKDIB 
DMKEXT 
DMKHVC 
DMKIOS 
DMKLOH 
DMKMCT 
DMKMSG 
DMKNLE 
DMKPRG 
DHKRGA 
DMKRSP 
DMKSPL 
DMKTHI 
DMKTRK 
DMKVAT 
DMKVDC 
DMKVIO 
DMKVSQ 



DMKCDS 
DMKCFM 
DMKCKP 
DMKCPS 
DMKCQP 
DMKCSP 
DMKDAS 
DMKDRD 
DMKFRE 
DMKHVD 
DMKISM 
DMKLOK 
DMKMIA 
DMK«S1f 
DMKPAG 
DMKPRV 
DMKRGB 
DMKSCH 
DMKSSS 
DMKTMR 
DMKUDR 
DMKVCA 
DMKVDD 
DMKVMA 
DMKHRM 



DMKACO 
DMKCCH 
DMKCFC 
DMKCFO 
DMKCKS 
DMKCPD 
DMKCQR 
DKKCSQ 
DMKDEF 
DMKDSP 
DMKGIO 
DMKIOE 
DMKJRL 
DHKMCC 
DMKMID 
DMKSES 
DMKPER 
DMKPSA 
DMKRNH 
DMKSCN 
DHKSTK 
DMKTRA 
DMKODU 
DMKVCH 
DHKVDR 
DMKVMC 



DMKDIA, DMKLOG, 



DMKALG, 
DMKCCW 
DMKCFD 
DMKCFP 
DMKCNS 
DMKCPV 
DMKCQY 
DMKCST 
DMKDGD 
DMKENT 
DMKGRF 
DMKIOF 
DMKLNK 
DMKMCD 
DMKMNI 
DMKNET 
DMKPGS 
DMKPTR 
DMKRPA 
DMKSEP 
DMKSVC 
DHKTRC 
DMKONT 
DMKVCN 
DMKVDS 
DMKVSI 



VMCBLOK 

Built bi: DMKVMC 
Released b:^: DMKVMC 
Referenced bi: DMKDSP, DMKVMC 

VMCMHDR 

Built b^: N/A 
Relea sed b^: N/A 
I®f6£§Iiced by: DMKMSG 



DMKAPI, 
DMKCDB, 
DMKCFG, 
DMKCFS, 
DMKCPB, 
DMKCQG, 
DMKCSB, 
DMKCSO, 
DMKDIA, 
DMKERM, 
DMKGRT, 
DMKIOG, 
DMKLOG, 
DMKMCH, 
DMKMON, 
DMKHLD, 
DMKPGT, 
DMKQCN, 
DMKRSE, 
DHKSNC, 
DMKTCS, 
DMKTRD, 
DMKUSO, 
DMKVDA, 
DMKVER, 
DMKVSP, 



VRRBLOK 

Built by* DMKVDS 

Released hj: DMKVDR 

Referenced by: DMKCCW, DMKCFP, DMKDGD, 
DMKGIO, DMKUHT, DMKVDS, DMKVSI 

VSPLCTL 

Built by: DMKDRD, DMKVSP 

Released by ; DMKVSP 

Referenced bj: DMKCKP, DMKCSP, DMKCSQ, 
DMKDRD, DMKSPL, DMKVSP, DMKVSQ 

VSPXBLOK 

Built b;^; DMKCST 

Released by; DMKCST 

Referenced by: DMKCKP, DMKCQG, DMKCSP, 
DMKCST, DMKSPL, DMKVDR, DMKVDS 

XINTBLOK 

ISilt by: DMKCFP, DMKCPB, DMKDSP, 
DMKGRF, DMKRGA, DMKSCH, DMKTMR 

Released bj: DMKCFP, DMKDSP, DMKSCH, 
DMKTMR 

Referenced bj: DMKCFP, DMKCPB, DMKDSP, 
DMKGRF, DMKRGA, DMKSCH, DMKTMR, DMKVMC 



XOBR3211 

Built bjr; DMKRSE 
Released by: DMKIOE 
Referenced by: DMKIOF, DMKRSE 
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CMS CONTROL BLOCK REFERENCES 



Assembled as part of DMSNDC. 
Referenced b^: DMSBAB, DMSDOS, DMSITP 



BBOX 

Assembled as part of DHSNDC. 

Referenced bj: No CMS references. This 
block is used by the DOS supervisor. 



ABWSECT 

Assembled as part of DMSNDC 

Referenced bj; DMSABK, BMSDBG, DBSFEE, 
DMSITI, DMSITP, DMSITS 



ADTSECT 



Assembled as part of DHSNOC. 



R ef grenc 

DMSACM, 
DMSARX, 
DMSBWR, 
DMSDLK, 
DMSEXC, 
DMSINS, 
DMSLDS, 
DMSMVE, 
DMSSET, 
DMSTRK, 



ed bj: 

DMSALU, 

DMSASM, 

DMSCMP, 

DMSDSK, 

DMSEXT, 

DMSLAD, 

DHSLFS, 

DMSPON, 

DHSSOP, 

DMSDPD, 



DMSABN, 
DMSAMS, 
DMSASN, 
DMSCPY, 
DMSDSL, 
DMSFNS, 
DMSLAF, 
DMSLKD, 
DMSQRY, 
DMSSTT, 
DMSXCP 



DMSACC, 
DMSARE, 
DMSADD, 
DMSBIO, 
DMSEDX, 
DMSFOR, 
DMSLBM, 
DMSLLD, 
DMSRNM, 
DMSTPE, 



DMSACF, 
DMSARN, 
DM S BOP, 
DMSDLB, 
DMSERS, 
DMSIFC, 
DMSLBT, 
DMSLST, 
DMSROS, 
DMSTQQ, 



AFTSECT 



Assembled as part of DMSNUC; also 
created and released dynamically by 
DMSLAF. 

Referenced b;^: DMSBRD, DMSBWR, DMSCPY, 
DMSERS, DMSFNS, DMSINT, DMSLAF, DMSPNT, 
DMSRNM, DMSSOP, DMSSTT, DMSTPE 



BGCOM 

Assembled as part of DMSNOC, 

Referenced b^: DMSAMS, DMSASN, DMSBAB, 

DMSBCP,~DMSCLS, DMSDLE, DMSDLK, DMSDMP, 

DMSDOS, DMSDSV, DHSFCH, DMSFET, DMSINS, 

DMSITP, DMSLLD, DMSOPL, DMSOPT, DMSPRV, 

DMSQRY, DMSRRV, DMSSET, DMSSMN, DMSSRV, 
DMSSTG, DMSVSE, DMSXCP 

CMSTAXE 

laili kl' DMSSVT 

Released by: DMSSVT 

Referenced by: DMSCIT, DMSITE, DMSITI, 
DMSSVT 



C7TSECT 

Assembled as part of DMSNUC. 
Referenced by: DMSINS 

DBGSECT 

Assembled as part of DMSNDC. 
Referenced by: DHSDBD, DMSDBG, DMSITE. 



ANCHSECT 

Built by: DMSSTG 
Released by: Not released 
Referenced by: DMSDOS, DMSSTG 



DE7SECT 

Assembled as part of DMSNDC. 
Referenced by: DMSTIO, DMSTPE 



BATLSECT 

Assembled as part of DHSBTP. 
Referenced by: DMSCIO, DMSITE, DMSPIO 



DE7TAB 

Assembled as part of DMSNDC. 

Referenced by: DMSA3H, DMSDBD, 
DMSEDX, DMSINI, DMSLLD, DMSSVT 



DMSEDI, 
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DIOSECT 

Assembled as part of DMSMDC. 

Referenced b:^: DMSACM, DHSDIO, DHSFNS, 
DMSITI 

DMSCCB 

Built bj.: N/A 
Released b^: N/A 
Referenced b][: DHSXCP 

DOSSECT 

lliilt, bx: DMSDLB 

Released b^: DMSDLB, DMSABN 

Referenced bj: DMSAMS, DMSBOP, DBSCLS, 
* DMSDLB, DMSDLK, DMSDSV, DMSOPL, DMSQRY, 
DMSRRV, DMSSRV, DMSS7T, DMSVIP, DMSXCP 

EDCB 

Built bY: DMSEDX 

Released b^: DM S ED I 

Referenced b^: DMSEDC, DHSEDI, DMSEDX, 
DMSGIO, DMSSCR 



FCBSECT 



Built bi: DMSFLD 

Released bjr: DHSFLD, DMSABN 

Referenced hj: DMSALD, DMSARN, DHSARX, 

DHSASM, DMSDSL, DMSFCH, DMSFLD, DMSLDS, 

DMSMVE, DMSQRY, DMSROS, DMSSAB, DMSSBD, 

DMSSBS, DMSSCT, DMSSEE, DMSSOP, DMSSQS, 
DMSSVN, DHSSVT, 



FCHTAB 

Assembled as part of DMSNDC. 
Referenced hj: DMSDOS, DMSFET 

FICL 

Assembled as part of DMSNDC. 

Referenced bj: No CMS references. This 
block is used by the DOS supervisor. 

FRDSECT 

Assembled as part of DMSNOC. 
Referenced b^: DMSFRE, DM S SET 



ERDSSCT 

Assembled as part of DMSNOC. 
Referenced bj: DMSERR 

EXrSECT 

Assembled as part of DMSNOC. 

Ief§ienced by: DMSINS, DMSINT, DMSIOW, 
DMSITS, DMSQRY, DMSSET, DMSSTG, DMSSVN, 
DMSSVT 

EXTOAREA 



FSCBD 

Built by: N/A 

Released by: N/A 

l§f§£esced by: DHSERD, DMSDLK, DMSIFC, 
DMSZAP, and user programs that access 
the CMS file system 



FSTD 

Built by: N/A 

Released by: N/A 

Referenced by: DMSCPY, DMSEDX, DMSEXC, 
DMSFNS, DHSGND, DMSNCP, DMSSOP, DMSTPE 



Assembled as part of DMSNDC. 
Released by: N/A 
No CMS references. 
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FSTSECT 



Built bi: DMSACF 

R eleased bj[: DM SAL 

lefetenced b^: DMSACF. DMSAMS, DMSARN, 



DMSARX, DMSASM, DMSBOP, 

DMSCPY, DMSDLK, DMSDSK, 

DMSFSS, DMSGND, DMSIFC, 

DMSLKD, DMSMVE, DMSRNM, 

DMSDPD, DMSXCP, DHSZAP 



DMSBRD, DMSBHR, 

DMSDSL, DMSERS, 

DMSLAF, DHSLBH, 

DMSSTT, DMSTPE, 



FVSECT 



Assembled as part of DMSNDC 



Referenc 

DMSACM, 

DMSBTP, 

DMSCWT, 

DMSFNS, 

DMSITS, 

DMSQRY, 

DMSTPE, 



ed bj: 

DMSALD, 

DMSBWR, 

DMSDIO, 

DHSINT, 

DHSLAD, 

DMSRNM, 

DMSTQQ 



DMSABN, 
DMSAUD, 
DMSCIT, 
DMSDOS, 
DMSITE, 
DMSLFS, 
DMSSLN, 



DMSACC, 
DMSBRD, 
DHSCRD, 
DMSDSK, 
DMSITI, 
DMSMOD, 
DMSSOP, 



DMSACF, 
DMSBTB, 
DMSCWR, 
DMSERS, 
DMSITP, 
DMSPKT, 
DMSSTT, 



IHADECB 

Built hi: N/A 

1.§1®§:§§^ b^: N/A 

referenced bj: DHSSBD, DMSSBS, DMSSCT, 
DMSSEE, DMSSVT 



lOSECT 

Assembled as part of DMSNDC. 

Referenced bj;: DMSABN, DMSHDI, DMSINT, 
DMSITI 



KEYSECT 

Built b^: DMSSVT 
Released bj.: DMSSVT 
Referenced bj: DMSSBD, DMSSVT 



LOBPR 

Assembled as part of DMSNDC 
Referenced b^: DMSDLK, DMSDSV 

LDBTAB 

Assembled as part of DMSNDC. 

Referenced bj: DMSAMS, DMSBOP, DMSCLS, 
DMSDLB, DMSFCH, DMSLLD, DMSOPL, DMSPRV, 
DMSRRV, DMSSET, DMSSRV, DMSXCP 

NICL 

Assembled as part of DMSNDC. 

Referenced b^: DMSBOP, DMSCLS, DMSDLB, 
DMSLLD, DMSXCP 



NDCON 



Assembled as part of DMSNDC. 



Refere 
DMSACM 
DMSARX 
DMSBOP 
DMSCAT 
DMSCPF 
DMSDBD 
DMSDMP 
DMSEDI 
DMSEXT 
DMSFOR 
DMSHDI 
DMSINM 
DMSITI 
DMSLBM 
DMSLGT 
DMSLOA 
DMSMOD 
DMSOPT 
DMSPNT 
DMSRDC 
DMSSAB 
DMSSET 
DMSSRT 
DHSSVN 
DMSTPE 
DMSVIP 



need bjJ 
DMSALD 
DMSASM 
DMSBRD 
DMSCIO 
DMSCPY 
DMSDBG 
DMSDOS 
DMSEDX 
DMSFCH 
DMSFRE 
DMSHDS 
DMSINS 
DMSITP 
DMSLBT 
DMSLIE 
DHSLSB 
DMSMVE 
DHS0R1 
DMSPRT 
DMSRNE 
DMSSBS 
DMSSLN 
DMSSRV 
DMSSVT 
DMSTQQ 
DMSVSR 



DMSABN 
DMSAMS 
DMSASN 
DMSBTE 
DMSCIT 
DMSCRD 
DMSDIC 
DMSDSK 
DMSERR 
DMSFET 
DMSGIO 
DMSIFC 
DMSINT 
DMSITS 
DMSLDR 
DMSLIC 
DMSLST 
DMSNCP 
DMSOVR 
DMSPRV 
DMSRNM 
DMSSCN 
DMSSMN 
DMSSSK 
DMSSYN 
DHSTYP 
DMSXCP 



DMSACC, 
DMSARE 
DHSADD 
DMSBTP 
DMSCLS 
DMSCWR 
DMSDLB 
DMSDSL 
DMSERS 
DMSFLD 
DMSGLB 
DMSINA 
DMSIOH 
DnSLAD 
DKSLDS 
DMSLKD 
DMSLSY 
DMSOLD 
DMSOVS 
DMSPDN 
DMSROS 
DMSSCT 
DMSSOP 
DMSSTG 
DMSTIO 
DMSDPD 

DMSZAP 



DMSACF, 
DMSARN, 
DMSBAB, 
DMSBWR, 
DMSCMP, 
DMSCWT, 
DMSDLK, 
DHSDSV, 
DMSEXC, 
DMSFNS, 
DMSGND, 
DMSINI, 
DMSITE, 
DSSLAF, 
DMSLFS, 
DMSLLD, 
DMSMDP, 
DMSOPL, 
DMSPIO, 
DMSQRY, 
DMSRRV, 
DMSSEE, 
DMSSQS, 
DMSSTT, 
DMSTPD, 
DMSVIB, 



LDRST 

Built b^: DMSLDR 

Released b^: DMSLDR 

Referenced bj;: DMSLDR, DMSLGT, DHSLIB, 
DMSLIO, DMSLSB, DMSOLD 



OPSECT 

Assembled as part of DMSNDC. 

Referenced bj: DMSABN, DMSARX, DMSASM, 

DMSCPY, DMSCRD, DMSCWR, DMSCWT, DMSDBG, 

DMSEXC, DMSEXT, DMSINS, DMSINT, DMSROS, 

DMSSBD, DMSSBS, DMSSCT, DMSSEB, DMSSOP, 

DMSSQS, DMSSVN, DMSSVT 
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OSFST 

Built hz: DMSROS 

geleasgd b^: DM SAL 

Referenced bj: DMSABN, DMSALU, DMSBOP, 
DMSDLK, DMSFCH, DMSMVE, DMSROS, DMSRRV, 
DMSSOP, DMSSRV, DMSSTT 



07SECT 

Built bi: N/A 

Released bj: N/A 

Referenced bi: DMSITS, DMSOVR 

PCTAB 

Assembled as part of DHSNDC. 
Referenced bi: DMSBAB, DMSDOS, DMSITP 

PDSSECT 

Built bj.: DMSSTT 
Released by: DMSSVT 
Referenced b^: DMSSTG, DMSSVT 



PUBADR 

Assembled as part of DMSNDC. 

Referenced bj: DMSBOP, DMSCLS, DMSDLK, 
DMSDSV, DMSLLD, DHSPRV, DHSXCP 

PUBOWNER 

Assembled as part of DMSNOC 

Referenced bj: DMSBOP, DMSCLS, DMSDLK, 
DMSLLO, DMSXCP 



SSAVE 



Built bj: DMSITS 

Rel ease d bj: DMSITS 

Referenced b^: DMSABN, DMSACC, DMSBAB, 

DMSDBG, DMSDLB, DHSDOS, DMSERR, DMSFLD, 

DMSFRE, DHSIFC, DMSITP, DMSITS, DMSLDR, 

DMSOVS, DMSSAB, DMSSLN, DMSSHN, DMSSOP, 

DMSSTG, DMSSVN, DMSSVT, DMSVIP, DMSXCP 



SDBSECT 

Assembled as part of DMSNDC. 
Referenced Bj: DMSAEN, DMSINM, DMSINT 



PGMSECT 



Assembled as part of DHSNDC. 

Referenced b^: DMSITP, DMSSAB, DMSSLN, 
DMSSTG, DMSSTT 



SVCSECT 

Assembled as part of DMSNOC. 

Referenced by: DMSCIT, DMSFRE, DMSHDS, 
DMSINT, DMSITE, DMSITS, DMSLAD, DMSLFS, 
DMSOVR, DMSOVS, DMSSLN 



PIBADR 

Assembled as part of DMSNOC. 
Referenced bj: DMSBAB, DMSDOS, DMSITP 



SVEARA 

Assembled as part of DMSNDC. 
referenced by: DMSBAB, DHSDOS, DMSITP 



PIB2TAB 

Assembled as part of DMSNOC. 
Referenced by: DMSBAB, DMSDOS, DMSVSR 



SYSCOH 

Assembled as part of DHSNDC. 

Referenced bj'. DHSBAB, DHSBOP, DMSDOS, 
DMSFET, DMSITP, DHSQRY, DHSSTG, DHSSYN 
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SYSNAMES DSAVE 

Assembled as part of DMSNDC. Built bj: N/A 

Referenced bjr: DMSAMS, DHSBOP, DMSBPT, Released bj: H/A 

DMSDOS, DMSEDX, DMSEXC, DMSINS, DMSINT, 

DMSITS, DMSQRY, DMSSET, DHSVIB, DMSVSR Referenced bj: DMSITS 



TSOBLKS DSERSECT 

Assembled as part of DMSNOC. Assembled as part of EMSNDC, 

Referenced b^: DMSSET No CMS references. 



Appendix E. Data Areas and Control Block References 325 



RSCS CONTROL BLOCK REFERENCES 



ASYNE 

Built bi: DMTASY 

Released bi: DMTASY, DM TASK 

Heferenced b^: DMTASY, DMTEXT, DMTIOH, 
DMTSIG 



GIVEE 

Built bi: DHTGIV / 
Released bj: DMTAKE, DMTASK 
Referenced bj: DHTAKE, DHTASK, DMTGIV 



lOE 



BUFDSECT 

Built b^: DMTSHL 
Released b^: DMTSHL 
leferenced b^: DMTSML 



Built bjr: DMTIOM 

Released b^: DMTIOH 

Referenced bj: DHTASK, DHTIOM, DHTREX 



COMDSECT 

Built bi: DMTCOM 

Released bj: N/A 

Referenced bj: DMTAXS, DMTCMX, DMTHGX, 
DMTNPT,~DMTREX, DMTSML 

DEVTABLE 

Built bj: DMTNPT 
Released b^; DMTNPT 
Referenced by: DMTNPT 

FREEE 

Built b^;: DMTQRQ 

Released by: DMTQRQ 

Referenced b^: DMTASK, DMTINI, DMTQRQ 

GIVE 

Built bx: DMTSML, DHTNPT, DMTAXS, DMTREX 

Released h^'- N/A 

Referenced b^: DMTSML, DMTNPT, DMTAXS, 
DMTREX 



lOTABLE 



Built hj: DHTIOH, 
DHTREX, DHTSML 



DMTCRE, DMTNPT, 



Released bj: DMTNPT, DHTSML 

Referenced bj: DHTAXS, DHTCHX, DMTCRE, 
DHTINI, DMTIOH, DHTREX, DMTSHL 



LINKTABL 

Assembled into DMTSYS at system 
generation; also built by DHTCHX. 

Released bj: DHTCHX 

Referenced by: DHTASY, DHTAXS, DHTCHX, 
DHTCOH, DHTCRE, DHTEXT, DMTLAX, DMTHGX, 
DMTNPT, DHTREX, DHTSHL 



REQBLOCK 

Built by: DHTNPT 
Released bj: DMTNPT 
Referenced bj: DMTNPT 
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EOOTE 

Assembled in DHTSYS 
Released b^: 
Referenced hj_t DKTAXS 



TAKE 

Built bi: DHTSHL, DHTHPT, DMTAXS, DMTREX 

R ele ased by : N/A 

R efere nced bj: DMxSHL, DHTHPT, DMTAXS, 
DHTREX 



SVECTORS 



Assembled into DMTVEC at system 
generation; resides in the RSCS nucleus. 

Referenced bj: DMTAKE, DMTASK, DMTASY, 

DMTAXS, DMTCMX, DMTCOM, DHTCRE, DMTDSP, 

DRTEXT, DMtGIV, DiiTlHl, DriTlOM, DMTLAX, 

DMTMGX, DMTNPT, DMTQRQ, DMTREX, DMTSIG, 

DMTSML, DMTSTO, DHTSVC, DMTHAT 



TAG 



Ulilt by: DSTAXS 

Released bj: DMTAXS 

Referenced bj;: DMTAXS, DMTCMX, DMTNPT, 
DMTSML 



TANKDSEC 

Built bx: DMTSML 
Released bj_: DMTSML 
Referenced bj: DHTSflL 

TAREA 

Assembled into each task module. 

Released bj: DMTASK 

Referenced bj: DMTAKE, DMTASK, DMT AS Y, 
DMTCOM, DMTCRE, DMTDSP, DMTEXT, DMTGIV, 
DMTIOM, DMTREX, DMTSIG, DMTSTO, DMTSVC 



TASKE 



TAGAREA 

Built b^: DMTAXS 
Released b^: N/A 
Referenced bj.: DMTAXS 



lliili kl' DMTASK 
Released b^: DMTASK 

Referenced bj: DMTAKE, DMTASK, DMTASY, 
DMTAXS, DMTCOM, DMTDSP, DMTEXT, DMTGIV, 
DHTINI, DMTIOM, DMTNPT, DMTPST, DMTREX, 



TCTDSECT 

Built bi: DMTSML 
Released b;^* DMTSML 
Referenced bj: DMTSML 
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